Ответ учителя по предмету Информатика
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.
Похожие вопросы от пользователей
{4х+7у=6
{ах-14у=-12
1.His story isn’t … long … yours.
2.Our mother is … young … her.
3. This writer isn’t …famous … Jack London.
4. My wife is more beautiful … his.
5.Second class isn’t … expensive … first.
6.My friend’s dog is … clever …my.
7.this story isn’t … interesting … I trought.
8.That furniture is a little bit cheaper … this.
9.Their flat is nearly …comfortable … our.
10.Her room is much more cleaner … his.
Ты любишь собак?
Да . Я люблю больших собак.
Твои родители работают по субботам?
Нет. По субботам мы иногда всей семьёй ходим в парк.
Твой друг хорошо плавает ?
Да. Он живёт в Самаре .он плавает в Волге.
Посмотри! Что там на дереве?
Большая птица !
Твой брат любит кошек ?
Нет , он любит только компьютер! Это его хобби.