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

Question

Элюся

26 декабря, 00:55

+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.