Есть ответ 👍

Дан одномерный массив а[n] подсчитать количество чётных значений элементов массива.

208
358
Посмотреть ответы 3

Ответы на вопрос:


Var a: array [1..100] of integer; i,k,n : integer; begin readln(n); for i: =1 to n do readln(a[i]); k: =0; for i: =1 to n do if a[i] mod 2=0 then k: =k+1; writeln(k); end.

Const n=10; var cp,i: integer; a: array[1..n] of integer; begin for i: =1 to n do begin write('a[',i,']='); read(a[i]); if a[i] mod 2=0 then cp: =cp+1; end; writeln('кол-во четных элементов в массиве равно ',cp); end.

a)

i = 0

s = 0  

while i < 7:

   s = s + i

   i += 1

print(s)

b)

i = 0

s = 0  

while i < 7:

   print(s, i)

   s = s + i

   i += 1

Популярно: Информатика