Блок схемы несет следующую смысловую нагрузку: а) блок ввода/вывода б) блок начала алгоритма в) блок действий г) блок начала цикла
101
476
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1467 от 02.06.2017 // внимание! если программа не работает, обновите версию! begin var sg: =['а','е','и','о','у','ы','э','ю','я']; var a: =readlnstring('вводите текст: ').towords(',','.'); var r: set of char=[]; for var i: =0 to a.length-1 do begin var b: =a[i].where(c-> c in sg).groupby(t-> t).select(t-> (t.key,t.count)); foreach var t in b do if t[1]> 2 then r+=[t[0]]; end; var s: =''; foreach var c in r do s+=c; s.orderby(t-> t).println(',') end. пример вводите текст: дает,корова,молоко,а,жираф,это,,животное. е,о
Популярно: Информатика
-
slava0255512.04.2021 05:23
-
rubyrose200301.01.2020 18:11
-
lina2017qa24.04.2022 06:05
-
XxxJEKxxX26.08.2022 12:55
-
goncharovkava03.06.2021 00:29
-
accacherrygdghvcg12.04.2021 18:31
-
Fqx03.06.2021 07:02
-
shhfxecbhawc30.07.2022 02:37
-
leka12131422.01.2020 01:10
-
Shiro130329.05.2023 15:52