Как решить такую задачу в паскале?

Дано двузначное число. Найти сумму его цифр.

Question

Розалина

11 июля, 20:10

+5

Ответы (1)

Знаете ответ на вопрос?

Минай · Answer 1

var a, s:integer;

begin

write ('a = ') ;

readln (a) ;

s:=a div 10+a mod 10;

writeln ('s = ', s) ;

end.

Пример:

a = 25

s = 7

Как решить такую задачу в паскале?Дано двузначное число. Найти сумму его цифр.