Ввести с поддержкою read(); два трехзначных числа N1 и N2 (оба

var n1,n2,n11,n12,n13,n14,n15,n16,sum1,sum2:integer; описание переменных
begin
read (n1,n2); считывание N1,N2
n11:=((n1 div 100)); поиск значений первой, 2-ой и третьей цифры первого числа
n12:= (n1- n11*100) div 10;
n13:= n1- n11*100 - n12*10;

n14:= n2 div 100; подобно со вторым числом
n15:= (n2-n14*100) div 10;
n16:= n2-n14*100-n15*10;
sum1:=n11*100+n12*10+n16; перестановка заключительных цифр местами
sum2:=n14*100+n15*10+n13;
writeln(sum1, ,sum2, ,sum1+sum2); вывод данных
end.