Есть ответ 👍

Згинирировать массив из 20 чисел подсчитать количество чётных. надо

222
350
Посмотреть ответы 2

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


Program z1; var a: array [1..30] of integer; i,k: integer; begin k: =0; for i: =1 to 30 do  begin readln a[i]; if a[i] mod 2 =0 then k: =k+1; end; wreteln('четных',k); end.
Mihail568
4,6(25 оценок)

План: 1.начать с легких 2.усложнять 3.делать каждый по твоему опыту 4.заниматся разными спорта 5.добиться до хорошей телесложения

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