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

Var a,b,c: integer;Beginwrite('Ведите двузначное число: ');readln (a);b:=a div 10;c:=a mod 10;writeln('Сумма цифр равна: ',c+b);writeln('Перевернутое число: ',c,b)End.