1)Напишите процедуру в программе Pascal ABC(Паскаль), которая выводит на экран в столбик все цифры переданного ей числа, начиная с первой.
Пример:
1234
1
2
3
4
 
2)Напишите процедуру, которая выводит на экран запись переданного ей числа в римской системе счисления.
Пример:
2013
MMXIII

procedure example(var n:integer);vary:integer;beginrepeaty:=n mod 10;writeln(y);n:=n div 10;until n=0;end;