Регистрация
nik868
06.09.2022 20:25
Информатика
Есть ответ 👍

Нахождение ТКНФ и ТДНФ Решал раньше разучился Нужен чел связь tg, @ чеканую монету дарю

253
429
Посмотреть ответы 1

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

Angela11001
Angela11001
4,8(2 оценок)
Var a,k: integer; begin readln(a); k: =0; while a> 0 do   begin   if a mod 2=0 then k: =k+1;   a: =a div 10;   end; writeln(k); end. пример: 321 1

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