Регистрация
kazymbietova71
17.06.2023 15:30
Информатика
Есть ответ 👍

(паскаль) требуется составить программу нахождения количества чисел кратных двум. любая последовательность. !

176
411
Посмотреть ответы 2

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

grekorim1998a
grekorim1998a
4,6(89 оценок)
Var a,k: integer; begin assign (input, 'input.txt'); reset (input); assign (output, 'output.txt'); rewrite (output); k: =0; while (not eof(input)) do begin   readln(a);   if (a mod 2 =0)   then   k: =k+1; end; writeln(k); end.
ahmetovalim
ahmetovalim
4,4(74 оценок)
Гавтобус & машина б машина а машина | автобус в метро| автобус| машина

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