Взаданном одномерном массиве состоящем из n целых частей нужно посчитать количество четных

Diankao4ka Diankao4ka    1   20.08.2019 06:10    0

Ответы
Куликова2006 Куликова2006  05.10.2020 06:42
Var  n,c,i: integer;  A: array[1..10000] of integer;begin  write('Кол-во частей: ');  read(n);
  for i:=1 to n do    read(A[i]);
  c:=0;  for i:=1 to n do    if A[i] mod 2 = 0 then c += 1;      write('Чётных чисел: ',c);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика