сделать информатику. Нарисуйте на сцене одну из букв <<L>>, <<O>>, <<T>>, << H>> цветными линиями
231
419
Ответы на вопрос:
Var s: string; p: integer; begin s : = 'no or yes? '; if pos('yes', s) > 0 then begin p : = pos('yes', s); delete(s, p, 3); insert('no', s, p); end; end.
Популярно: Информатика
-
Qween12345200302.09.2022 14:39
-
kaba4ok200102.11.2021 22:58
-
0Neder028.09.2020 06:57
-
Habibullinaasa27.10.2022 12:54
-
Sa4eR03.01.2021 19:09
-
ViktoriaTigra14.05.2020 17:10
-
Elay1103.09.2020 14:46
-
Shatunova197603.07.2020 03:31
-
vladekan02.05.2022 13:22
-
inzhu12334515.10.2021 07:01