1)напишите процедуру в программе pascal abc(паскаль), которая выводит на экран в столбик все цифры переданного ей числа, начиная с первой. пример: 1234 1 2 3 4 2)напишите процедуру, которая выводит на экран запись переданного ей числа в римской системе счисления. пример: 2013 mmxiii
Var
s: String;
i: Integer;
Begin
Str(n, s);
For i := 1 to Length(s) do Writeln(s[i]);
End;
Вторая в файле: