Переписать под паскаль абс.net дана строка, в которой содержится осмысленное текстовое сообщение. слова сообщения разделяются пробелами и знаками препинания. 1. вывести только те слова сообщения, в которых содержится заданная подстрока. using system; using system.linq; class program { static void main(string[] args) { string str = "дана строка, в которой содержится осмысленное текстовое сообщение. " + "слова сообщения разделяются пробелами и знаками препинания\n"; string podstr = "ния"; //подстрока var temp = str.(i => i.contains(podstr)); console.writeline(str); foreach (var word in temp) console.write(word+" "); console.readline(); } }

jenja117 jenja117    1   31.08.2019 02:50    1

Ответы
draufzoda draufzoda  16.08.2020 06:42
// PascalABC.NET 3.2, сборка 1436 от 01.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var str:='Дана строка, в которой содержится осмысленное текстовое сообщение. '+
    'Слова сообщения разделяются пробелами и знаками препинания'+NewLine;
  var podstr:='ния'; //подстрока
  var temp:=str.Split.Where(i->pos(podstr,i)>0);
  Writeln(str);
  foreach var word in temp do Print(word)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика