Вопрос по программированию Pascal
Поменять местами цифры трехзначного числа и вывести их на экран

var a,b,c,d:integer;beginrandomize;a:=random(990)+10;writeln(a);b:=a div 100;c:=a mod 10 ;writeln('Первое цифра числа - ',b);a:=a div 10;d:=a mod 10;writeln('Вторая цифра числа - ',d);writeln('Третья цифра числа - ',c);writeln(b,c,d);end.