На паскале не пишу (python - ван лав):
var num,first,scnd:integer;
begin
readln(num); //вводим число с клавиатуры
first := num div 10; //узнаем первое число
scnd := num mod 10; //узнаем второе число
writeln(first + scnd);
writeln(first * scnd);
write(scnd);
write(first);
end.