!ПОМОГИТЕ ПОЖАЛУЙСТА!
Составить программу, которая получает новую строку, удалив из первоначальной строки третье слово

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadlnString.ToWords; // читаем строку, образуем массив слов
  var s:=(a[:2]+a[3:]).JoinIntoString; // получаем новую строку
  Writeln(s) // вывод...
end.

Пояснения.
a - массив с индексами от 0 до n-1, где n - число слов.
Срез a[:2] возвращает последовательность элементов массива 0 и 1.
Срез a[3:] возвращает последовательность элементов массива, начиная с третьего и до конца массива. Объединение последовательностей порождает необходимый набор слов, который объединяется в строку через пробел при помощи JoinIntoString.

Пример
А роза упала на лапу Азора
А роза на лапу Азора

Немного не то, что надо для школы:)

Нет, это всего лишь, возможно, не то, что надо для ВАШЕЙ школы, не более того. Многих других учат писать именно в таком стиле.

Просто вам не повезло с учителем информатики и вас учат писать в понятиях паскаля образца 1974 года. Как будто 43 года программирование стояло на месте...

У нас все стоит на месте, в книжках та же х***)