Исполнитель Редактор получает на вход строку цифр и преобразовывает её. Редактор может выполнять две команды, в обеих командах v и w обозначают цепочки символов. заменить (v, w) нашлось (v) Первая команда заменяет в строке первое слева вхождение цепочки v на цепочку w. Если цепочки v в строке нет, эта команда не изменяет строку. Вторая команда проверяет, встречается ли цепочка v в строке исполнителя Редактор. Если она встречается, то команда возвращает логическое значение "истина", в противном случае возвращает значение "ложь". Дана программа для исполнителя Редактор:
НАЧАЛО ПОКА нашлось (1111) заменить (1111, 2) заменить (222, 1) КОНЕЦ ПОКА КОНЕЦ все
ОЧЕНЬ С ОБЪЯСНЕНИЕМ
259
498
Ответы на вопрос:
// pascalabc.net 3.0, сборка 1073 const s='qwertyuiopasdfghjklzxcvbnmqqwertyuiopasdfghjklzxcvbnmq'; var c: char; p: integer; begin repeat write('введите латинскую букву, иной символ завершит работу: '); readln(c); p: =pos(c,s); if p> 0 then writeln('рядом буква "',s[p+1],'"') until p=0 end. тестовое решение: введите латинскую букву, иной символ завершит работу: y рядом буква "u" введите латинскую букву, иной символ завершит работу: h рядом буква "j" введите латинскую букву, иной символ завершит работу: m рядом буква "q" введите латинскую букву, иной символ завершит работу: p рядом буква "a" введите латинскую букву, иной символ завершит работу: 5
Популярно: Информатика
-
Лилия20000030.01.2022 22:43
-
Luciferiy01.04.2021 18:51
-
fainanem08.01.2020 06:13
-
slunyavchik09.09.2020 12:21
-
squeezy131223.04.2022 01:35
-
kolart03.11.2021 16:34
-
zejbelanka19.06.2020 06:26
-
hrustam200429.06.2023 05:19
-
fgdhdrbnh29.05.2021 22:09
-
gif1030.03.2020 08:04