Регистрация
ekaterina20122
21.04.2022 16:41
Информатика
Есть ответ 👍

Много . написать на языке паскаль данную . желательно, с пояснениями. дано целое 3-хзначное число. определить, является ли сумма его цифр четной.

285
302
Посмотреть ответы 2

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

Maximp190302
Maximp190302
4,7(43 оценок)
Var a,s: integer; begin repeat write('vvedite triohznacinoe cislo: '); readln(a); until(a> 99)and(a< 1000); s: =a div 100+a div 10 mod 10+a mod 10;   if s mod 2=0 then writeln('summa zifr ciotnaia') else writeln('summa zifr neciotnaia '); readln; end.
Kazhimyrat0210
Kazhimyrat0210
4,8(21 оценок)

Майнкрафт лучше всех!!!

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