ответ:var
a:integer;
begin
write('введите двузначное число: ');readln(a);
writekn('ответ: ',(a div 10)+(a mod 10));
end.
Объяснение:вот так
