Регистрация
arseniypiv150
01.10.2022 18:05
Информатика
Есть ответ 👍

Составьте программу проверяющую верно ли что сумма цифр введенного целого 3х значного числа является нечетным паскаль

123
152
Посмотреть ответы 2

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

Krossmans111
Krossmans111
4,5(8 оценок)
Var a,sum: integer; begin readln(a); sum: = a div 100 + a div 10 mod 10 + a mod 10; if (sum mod 2 = 0) then writeln('сумма чисел: ',sum,' число является четным.') else writeln('сумма чисел: ',sum,' число не является четным.'); end.
xxlllxxx
xxlllxxx
4,4(70 оценок)

40 пикселей

Объяснение:

200*8=1600(бит) – вес

1600/1 =1600 всего пикселей

сторона равна √1600=40

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