написать программу, которая находит сумму цифр двузначного числа, введенного с клавиатуры и число, образованное перестановкой цифр исходного числа.

var x,y,z:byte;beginread(z);x:=z div 10;y:=z mod 10;writeln('Сумма равна:',x+y,'  Новое число: ',y,x)end.