Дана строка текста до 60 символов.слова разделены пробелами.заменить встречающиеся в строке слова то на слово это.напечатать исходную и полученную строки.напишите, , программу.составить программу в паскале.
vark: integer; s: string; beginreadln(s); k: =pos('то',s); while k< > 0 dobegin k: =pos(' то ',s); if k< > 0 then begin delete(s,k+1,2); insert('это',s,k+1); end; end; writeln(s); end.
Баринова
10.02.2023
Если изобразить на диаграмме эйлера каждый запрос - будет видно, где страниц больше, а где меньше. | - или, это страницы, на которых есть или одно, или другое, или все вместе. & - объединение, это страницы, где есть и одно, и другое. если рассмотреть диаграммы, то самое маленькое кол-во страниц будет найдено по запросу царевна & лягушка & сказка - это страницы, на которых есть и царевна, и лягушка, и сказка.на втором месте идет царевна и лягушка, это страницы, где есть и царевна, и лягушка.на третьем месте - царевна или лягушка, это страницы, на которых есть или царевна, или лягушка, или царевна с лягушкой вместе.самый большой запрос - царевна или лягушка или сказка, он включает в себя всю диаграмму целиком.ответ: гбав
vipteatr
10.02.2023
Команды: 1) *3 2) +1 т.к. умножать на 3 мы можем любое число, а делить, чтобы получить целое, нет, будем решать наоборот, получать из числа 25 число 2, вычитать 1 и делить на три (в том случае, если делится на 3). затем просто запишем последовательность команд в обратном порядке. 25 на 3 не делится, 25 - 1 = 24 (команда 2) 24 на 3 делится, 24 / 3 = 8 (команда 1) 8 на три не делится, 8 - 1 = 7 (команда 2) 7 на три не делится, 7 - 1 = 6 (команда 2) 6 на три делится, 6 / 3 = 2 (команда 1) записываем в обратном порядке: 12212 можем проверить: 2*3 = 6 6+1=7 7+1=8 8*3=24 24+1=25 ответ: 12212
vark: integer; s: string; beginreadln(s); k: =pos('то',s); while k< > 0 dobegin k: =pos(' то ',s); if k< > 0 then begin delete(s,k+1,2); insert('это',s,k+1); end; end; writeln(s); end.