Вопрос по информатике:
Плз помогите , решительно задачу как нибуть по проще . на языке pascal
Пожаловаться
- 19.07.2017 06:01
- Информатика
- remove_red_eye 10063
- thumb_up 24
Ответы и объяснения 2
Var
s,s1,s2:String;
begin
readln(s);
s:=s+' ';
while s'' do
Begin
s2:=copy(s,1,pos(' ',s));
insert(s2,s1,1);
delete(s,1,pos(' ',s));
End;
writeln(s1);
end.
Пожаловаться
- 20.07.2017 19:19
- thumb_up 11
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы