Написать программу сумма цифр двухзначного - вопрос №1391419 от 23149004316 11.12.2022 19:06

Question

Информатика: Написать программу сумма цифр двухзначного

23149004316 · Answer

program raf105;

var ab,a,b,sum: integer;

begin

write('Введите двузначное число: ');

readln(ab);

a:= ab div 10;

b:= ab mod 10;

sum:= a+b;

writeln('Сумма цифр: ',sum);

end.

Язык PascalABC