Ответы на вопрос:
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.
Популярно: Информатика
-
Орындау нәтижесінде экранда не пайда болады? А) Akparat 1, 18, 28 В) Akparat...
Defalt1309.03.2021 21:54 -
Дан фрагмент кода: z=0 for x in range (7) z=x Сколько раз выполнится цикл?...
alena0707listru30.04.2023 08:43 -
составить текст вопрос-ответ тему Робототехника 15 вопросов и ответов ...
MMalaya29.08.2021 12:46 -
1. Phyton предназначен для ... создания 3-d моделей создания сайтов Оразработки...
shopiakprod05.06.2023 00:13 -
Написать программу к задаче с использованием вложенных условий. Фото программы...
annasafaryan8715.06.2021 14:53 -
Рассмотрите код программы: a=4; b=2; c=6 a=(a/b)*c print(a) Что выйдет в результате...
koli1701.12.2022 03:45 -
последние трачу, задания выделены карандашом...
асат724.09.2021 04:38 -
Какой размер файла jpg,gif,tiff,png,bmp прошу надо ❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤❤...
oal6405.05.2023 14:29 -
1. Составить построчный алгоритм и блок-схему к нему, вычисляющий сумму чисел...
Karamelka65912.02.2020 12:50 -
Какой способ образования у слов листки , осенние , промелькнули ....
Dodod61611.12.2020 12:19