4. составить алгоритм и написать решение на паскале: дано целое трехзначное число. разбить его на цифры и вывести их на экран в обратном порядке.

Var chis,a,b,c: integer;beginreadln(chis);a:= chis div 100;b:= chis mod 100;c:= b div 10;chis:= b mod 10;writeln(chis,c,a);end.