Паскаль!!! нужно, чтобы каждая цифра числа выводилась в столбик например 4758 4 7 5 8
Паскаль!!!
нужно, чтобы каждая цифра числа выводилась в столбик
например 4758
4
7
5
8
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
var
s:string;
i:integer;
begin
Write('Введите число: '); Readln(s);
for i:=1 to Length(s) do Writeln(s[i])
end.
Тестовое решение:
Введите число: 4758
4
7
5
8
А это - современный вариант:
// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
begin
ReadlnString('Введите число:').Println(NewLine)
end.
Тестовое решение:
Введите число: 4758
4
7
5
8
Не нашли ответ?
Похожие вопросы