Написать программу

Вычислить сумму двух последних цифр двух натуральных трехзначных чисел.

Var

a, b, s:integer;

begin

Write ('Введите два натуральных трехзначных числа: ') ;

Read (a, b) ;

s:=a mod 10 + (a mod 100) div 10;

s:=s+b mod 10 + (b mod 100) div 10;

Writeln ('Сумма двух последних цифр чисел равна ', s)

end.

Пример

Введите два натуральных трехзначных числа: 132 559

Сумма двух последних цифр чисел равна 19