Удалить в тексте, все слова которого разделены одним пробелом, первое слово, если в нём больше, чем 7 букв. (школьный pascal)
150
371
Ответы на вопрос:
Var s: string; begin readln(s); if pos(' ',s)> 8 then delete(s,1,pos(' ',s)); writeln(s); end.
Популярно: Информатика
-
alinapvby04.06.2023 07:52
-
kirillbatalov205.12.2022 18:22
-
Zenkinadasha21.05.2022 11:24
-
Keranius06.10.2020 08:23
-
smail55025.06.2020 03:42
-
tevzi25.05.2022 12:13
-
ObraztsovaOlga25.12.2022 15:31
-
bobr628.09.2022 15:07
-
ПолинаПять05.11.2020 07:13
-
maarusya17.04.2021 09:33