Question

Написать программу, котарая будет считать сумму цифр двух значного числа

Answer 1

var a: integer;
begin
write ('Введите двузначное число: ');
readln (a);
writeln('Сумма цифр числа равна: ',a div 10 + a mod 10)
end.