Консультация № 138531
29.05.2008, 17:35
0.00 руб.
0 1 1
Многоуважаемые эксперты, помогите составить программу, формирующую массив целых чисел, подсчитать количество четных чисел в массиве. Заранее благодарен.

Обсуждение

давно
Старший Модератор
31795
6196
29.05.2008, 18:02
общий
это ответ
Здравствуйте, Верещагин Михаил!

Программа в приложении.
Удачи!

Приложение:
const n=15; var a:array[1..n]of integer; b,c:integer; begin randomize; c:=0; for b:=1 to n do begin a[b]:=random(200); write(a[b]:4); inc(c,ord(not odd(a[b]))); end; writeln; writeln(‘number:‘,c:5); end.
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

Форма ответа