переписать под паскаль абс.net
Дана строка, в которой содержится осмысленное текстовое сообщение. Слова сообщения разделяются пробелами и знаками препинания. 1. Вывести только те слова сообщения, в которых содержится заданная подстрока.
using System;
using System.Linq;

class Program
{
static void Main(string[] args)
{
string str =
"Дана строка, в которой содержится осмысленное текстовое сообщение. " +
"Слова сообщения разделяются пробелами и знаками препинания";
string podstr = "ния";//подстрока
var temp = str.Split().Where(i => i.Contains(podstr));
Console.WriteLine(str);
foreach (var word in temp)
Console.Write(word+" ");
Console.ReadLine();
}
}

PascalABC.NET - это С# для школьников в синтаксисе Паскаля, разбавленный вкусняшками из Python )))

// 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.