Ответы на вопрос:
// pascalabc.net 3.3, сборка 1579 от 18.11.2017 // внимание! если программа не работает, обновите версию! begin var s: =readlnstring('введите строку слов: '); var w: =readlnstring('введите слово для замены: '); var (fc,lc): =(w.first,w.last); s: =s.towords.select(v-> (pos(fc,v)> 0) or (pos(lc,v)> 0)? w: v) .joinintostring; writeln(s) end. пример введите строку слов: наша таня громко плачет уронила в речку мячик введите слово для замены: удалено наша таня удалено плачет удалено в удалено мячик
Популярно: Информатика
-
Katya12435402.03.2023 20:50
-
nikTNG27.06.2021 23:14
-
87717140250105.08.2022 15:04
-
dmukh23.03.2022 04:59
-
Znv25060509.08.2020 01:52
-
goroskopy05.02.2022 19:51
-
kan00123.04.2021 00:58
-
qwer54321asdfrewq20.04.2023 02:08
-
lolipop10110.01.2021 19:47
-
345678901234567890512.04.2020 05:02