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

Question

Севастьяна

13 сентября, 11:25

+4

Ответы (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.