Регистрация
пятка1980
01.12.2021 22:26
Информатика
Есть ответ 👍

Написать программу , которая определяет сколько в пятизначном числе цифр 2 . , нужно

217
264
Посмотреть ответы 2

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

Нига2ц8
Нига2ц8
4,5(94 оценок)
Var a, b, k : integer; begin k : = 0; write('введите число: '); readln(a); while a < > 0 do begin b : = a mod 10; if b mod 2 = 0 then inc(k); a : = a div 10 end; writeln('количество четных цифр: ', k) end.
am5673
am5673
4,6(61 оценок)

Объяснение:

var x,i:integer;

begin

for i:=1 to 50 do

x:=x+i;

write(x);

end.

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