Ответы на вопрос:
Например так: k: =false; i: =pos(' ',s); repeat inc(i); if (s[i]=' ') then k: =true; until k; writeln(i);
Популярно: Информатика
-
McVano10.04.2021 15:43
-
gavrikov14.01.2022 02:49
-
ketrinkryt07.12.2020 22:40
-
виталий12427.01.2021 17:41
-
Лиззовета05.12.2020 22:06
-
bagauridiana14.05.2021 03:18
-
арсенийпузырев05.05.2023 15:41
-
artemushakov0артем13.06.2020 23:03
-
блеск417.03.2022 22:06
-
Sijjj77716.09.2021 10:02