Регистрация
kicked102
06.04.2022 18:40
Информатика
Есть ответ 👍

Как реализуются все виды циклов.

209
219
Посмотреть ответы 1

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

ciromerka
ciromerka
4,4(46 оценок)
Program z2; var x, y, k: integer; begin             readln (x);               k: =0;               while x< > 0 do               begin                         y: =x mod 10;                         if y mod 2 =0 then k: =k+1;                         x: =x div 10;               end;               writeln ('k=' ,k);

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