Предмет: Информатика, автор: Wqoghv

Дано число. Определите будет ли сумма его цифр четным. Если 《да》, выведите сообщение "сумма цифр числа...равна... она четная", если 《нет》, выведите сообщение "суммацифрчисла....равна... она нечетная"

Помогите, пожалуйста.
СРОЧНО НУЖНО


fen102: на каком языке писать?
fen102: добавил pascal.

Ответы

Автор ответа: fen102
1

На языке Python:

n = int(input())

i = n

sum = 0

while i != 0:

   sum = sum + i % 10

   i = i // 10

if sum % 2 == 0:

   print("Сумма цифр числа ", n, " равна ", sum, ", она чётная.", sep="")

else:

   print("Сумма цифр числа ", n, " равна ", sum, ", она нечётная.", sep="")

На языке Pascal:

program summa_comparator;

var n,i,sum:integer;

begin

write('Введите число >> ');

read(n);

i := n;

sum := 0;

while i <> 0 do begin

sum := sum + i mod 10;

i := i div 10;

end;

if sum mod 2 = 0 then

writeln('Сумма цифр числа ', n, ' равна ', sum, ', она чётная.')

else

writeln('Сумма цифр числа ', n, ' равна ', sum, ', она нечётная.')

end.


Wqoghv: Мне нужно на языке Pascal. Приношу извинения, что не написала об этом в вопросе. Если вам не сложно и вы знаете как это решить на нужном мне языке, то я буду очень вам благодарна
p15: могу в пайтоне в одну строку :)
p15: Хотя не лучше в 2
fen102: можешь - делай.
fen102: я постараюсь сделать в паскале, но не обещаю, что смогу.
fen102: на*
Wqoghv: Огромное вам спасибо. Вы меня просто спасли
Похожие вопросы
Предмет: Литература, автор: jdjff27