Удалить в тексте, все слова которого разделены одним пробелом, первое слово, если в нём больше, чем 7 букв. (Школьный pascal)
Удалить в тексте, все слова которого разделены одним пробелом, первое слово, если в нём больше, чем 7 букв. (Школьный pascal)
Гость
Ответ(ы) на вопрос:
Гостьvar
s:string;
begin
readln(s);
if pos(' ',s)>8 then delete(s,1,pos(' ',s));
writeln(s);
end.
Не нашли ответ?
Похожие вопросы