1)Напишите процедуру в программе Pascal ABC(Паскаль), которая выводит на экран в столбик все цифры переданного ей числа, начиная с первой. Пример: 1234 1 2 3 4 2)Напишите процедуру, которая выводит на экран запись переданного...
1)Напишите процедуру в программе Pascal ABC(Паскаль), которая выводит на экран в столбик все цифры переданного ей числа, начиная с первой. Пример: 1234 1 2 3 4 2)Напишите процедуру, которая выводит на экран запись переданного ей числа в римской системе счисления. Пример: 2013 MMXIII
Гость
Ответ(ы) на вопрос:
ГостьProcedure Proc1(n: Int64);
Var
s: String;
i: Integer;
Begin
Str(n, s);
For i := 1 to Length(s) do Writeln(s[i]);
End;
Вторая в файле:
Не нашли ответ?
Похожие вопросы