Question

написать программу вычисления суммы чисел двузначного числа

Answer 1

var
a,b,sum : integer;
begin
readln(a);
b:=a div 10;
a:=a mod 10;
sum:=a+b;
writeln(sum);
end.

Answer 2

у меня тоже самое что и того чувока вот