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

Question

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

Answer 1

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