Dalune
7 год назад
Удалить в тексте, все слова которого разделены одним пробелом, первое слово, если в нём больше, чем 7 букв. (Школьный pascal)
ОТВЕТЫ
Трифон
Jul 11, 2019
Var
s:string;
begin
readln(s);
if pos( ,s)gt;8 then delete(s,1,pos( ,s));
writeln(s);
end.
s:string;
begin
readln(s);
if pos( ,s)gt;8 then delete(s,1,pos( ,s));
writeln(s);
end.
195
Смежные вопросы:
