Регистрация
Samal0
16.11.2021 12:21
Информатика
Есть ответ 👍

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

143
296
Посмотреть ответы 2

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

Заря101
Заря101
4,6(84 оценок)
Program gt; var s,q,n: integer; begin s: =0; while n> 0 do begin q: =n mod 10; n: =n div 10; s: =s+q; end; writeln(s); if(n mod 2=0)then writeln('четное')else writeln('не четное'); end.
Rentels
Rentels
4,5(85 оценок)
5ff = 256*5 + 16*15 + 1*15 =1280 + 240 + 15 = 1535 байт   = 12280 бит

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