Question

Помогите, пожалуйста! Дам 60 баллов
Информатика 8 класс
Программа Паскаль

Answer 1

program abc;

var a,b,c,s: integer;

begin

s:=0;

writeln ('Введите двузначное число');

readln(a);

b:=a div 10;

c:= a mod 10;

s:= b + c;

writeln ('Сумма цифр вашего числа = ',s);

end.