дано двузначное число (n). Найти сумму цифр двузначного числа. помогите сделать в паскале)

Question

Севастьяна

9 января, 11:30

+3

Ответы (1)

Знаете ответ?

Пафнутий · Answer 1

Uses crt;

var n, s, a, b: integer;

begin

writeln ('Введите число n') ;

readln (n) ;

a:=n mod 10;

b:=n div 10;

s:=a+b;

writeln (s) ;

end.