Вопрос по информатике:
Напишите программу, которая выводит на экран все цифры числа, начиная с первой.
Входные данные
Входная строка содержит натуральное число N .
Выходные данные
Программа должна вывести все цифры введённого числа в одной строке, начиная с первой. Цифры отделяются пробелами.
Примеры
входные данные
123
выходные данные
1 2 3
На паскале.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 27.01.2015 19:20
- Информатика
- remove_red_eye 18867
- thumb_up 14
Ответы и объяснения 2
Var S:string;
i:integer;
Begin
Read(S);
For i:= 1 to Length(S) do
Write(S[i],' ')
End.
И так:
Var A,B:integer;
Begin
Read(A);
B:=0;
While A0 do
Begin
B:=B*10+(A mod 10);
A:= A div 10
End;
While B0 do
Begin
Write(B mod 10,' ');
B:=B div 10
End;
End.
- 28.01.2015 12:02
- thumb_up 44
PascalABC.NET 3.2, сборка 1399 от 08.03.2017
Внимание! Если программа не работает, обновите версию!
begin
ReadlnString.Println(' ')
end.
Пример
123
1 2 3
- 29.01.2015 04:11
- thumb_up 30
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.