1. дано трехзначное число. составить алгоритм, который выведет это число в обратном порядке. 2. даны любые 3 числа. составить алгоритм нахождения наименьшего из трех

Var  a, d, c, z, x :integer;beginreadln(a);d:= a div 100 ;c:=a mod 100;z:= c div 10;x:=c mod 10;writeln(x,z,d)end.
(для паскаля)