![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 26.12.2007
Сообщений: 11
|
![]()
помогите решить задачку,очень надо:
1.Подсчитать количество элементов кратных пяти вывестина экран их номера их значения в массиве из 17 чисел. 2.Подсчитать произвводные элементов кратных трем и не равных 9 в массиве из 13 чисел помогите решить,надо срочно,буду очень благодарен за помощь.а то училка убьёт сегодня ![]() ![]() ![]() заранее благодарю ![]() |
![]() |
![]() |
![]() |
#2 |
Пользователь
Регистрация: 23.05.2008
Сообщений: 97
|
![]()
program m17;
uses crt; var a:array[1..17] of integer; i:integer; begin for i:=1 ro 17 do readln(a[i]); for i:=1 to 17 do if a[i] mod 5 =0 then writeln(a[i],i); end.
я не для этого мира и это так
|
![]() |
![]() |
![]() |
#3 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]()
Ну примерно так:
Код:
I'm learning to live...
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
assembler помогите решить задачку !Очень срочно! завтра экзамен! | Taxist | Помощь студентам | 1 | 31.03.2008 20:51 |
Помогите пожалуйста! Очень надо | grodman | Помощь студентам | 1 | 13.10.2007 08:01 |
ПОМОГИТЕ ПОЖАЛУЙСТА РЕШИТЬ ЗАДАЧИ.. ОЧЕНЬ НАДО.. | unknown | Паскаль, Turbo Pascal, PascalABC.NET | 5 | 28.12.2006 14:02 |