Напишите программу, которая выводит на экран сумму чисел двухзначного и трёхзначного числа.

var a, i, n:integer; begin writeln ('Введите n'); readln (n); if n>=5 then writeln ('Введите n заново'); for i:=1 to 3 do begin a:=n mod 10; writeln ('Последняя цифра='); readln (a); n:=n div 10; a:=n mod 10; writeln ('Последняя цифра='); readln (a);