Решить по информатике дан текст х слова разделены запятой и пробелом удалите из текста слова которые начинаются на -не, а заканчуется на последнюю букву текста. после удаления слова должны быть разделены одной запятой и пробелом

begin

 var s := ReadlnString;

 s.ToWords(',', ' ')

     .Where(w -> (w[:3] <> 'не') or (w.Right(1) <> s.Right(1))).Println

end.

javascript:var строка = "Школьник, неполноценный, недоразвитый, винторогий"; alert(строка.split(", ").filter(function (зн) { return !(new RegExp("^не.*" + строка.charAt(строка.length - 1) + "$", "gi")).test(зн); }).join(", "));

Результат: "Школьник, винторогий".