Регистрация
styopyshca
18.08.2020 20:10
Информатика
Есть ответ 👍

Паскаль даны натуральные числа a1, . определить количество членов ai последовательности a1,, имеющих четные порядковые номера и являющиеся чётными числами

108
281
Посмотреть ответы 2

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

эги1
эги1
4,4(21 оценок)
Var i, n, k, a: integer; begin readln(n); k: =0; for i: =1 to n do begin readln(a); if (a mod 2 = 0) and (i mod 2 = 0) then inc(k); end; writeln(k); end.
Shabalina04
Shabalina04
4,4(76 оценок)
Всообщ. человек хронит информацию

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