Pascal ABC. В текстовом русскоязычном файле убрать все слова, начинающиеся на букву «а» и одновременно содержащие букву «о»

[MarsLoveMoon]

Написать программу, которая преобразует текст, находящийся в текстовом файле, созданном в текстовом редакторе Word. В текстовом русскоязычном файле убрать все слова, начинающиеся на букву «а» и одновременно содержащие букву «о».

[ZX Spectrum-128]

http://interacia.net/index.php/2011-...-12-28-27.html

[MarsLoveMoon]

Там нет даже наподобие задания.

[Vanta11a]

А собрать нужные элементы из нескольких заданий мощности процессора не хватает? Или Вы реально надеетесь, что эту простейшую задачу Вам решат?

[ZX Spectrum-128]

Сообщение от MarsLoveMoon

Там нет даже наподобие задания.

Как нет? Половинка вашего задания точно есть. Только там буква "а" ищется, а не "о".

[MarsLoveMoon]

Сообщение от ZX Spectrum-128

Как нет? Половинка вашего задания точно есть. Только там буква "а" ищется, а не "о".

в том и проблема что нужно что бы сначала нашёл после пробела букву а.
потом до 2ого пробела он должен вырезать слово если встретит букву о.
а как это записать? найти первую букву я знаю как а дальше как?через какой оператор?

[ZX Spectrum-128]

Удаление подстроки - delete

[MarsLoveMoon]

Сообщение от ZX Spectrum-128

Удаление подстроки - delete

а то я не знала этого оператора. как записать то?

[Son Of Pain]

А дальше найти следующую не-букву. Это и будет конец слова.
Искать циклом for, например, от найденной первой буквы до конца строки.
Что-то вроде

for i := start_of_word to length(s) do
	if not (s[i] in русские_буквы) then break;

А потом удалять известным уже delete от первой до второй переменной.