Сделать так, чтобы на экран выводились строки, в которых нет слова "Fatal" - Free Pascal

Формулировка задачи:

Добрый день! Подскажите пожалуйста, Есть файл, в нем записаны строки наподобие этих: Test.pas(16,4) Error: Identifier not found "g" Test.pas(16,7) Error: Identifier not found "g" Test.pas(39,65) Error: Identifier not found "g" Test.pas(46,36) Error: Identifier not found "g" Test.pas(47,40) Error: Identifier not found "g" Test.pas(48,5) Error: Identifier not found "ret" Test.pas(50,4) Fatal: Syntax error, ";" expected but "." found Как сделать так, чтобы на экран выводились строки, в которых нет слова "Fatal"

Решение задачи: «Сделать так, чтобы на экран выводились строки, в которых нет слова "Fatal"»

Листинг программы

if pos(') Fatal:', s) = 0 then writeln(s);

Объяснение кода листинга программы

В данном коде выполняется следующая последовательность действий:

Выполняется проверка: ) Fatal:. Если данная строка присутствует в переменной s, то выполняется переход к следующему шагу. Если нет, то выводится на экран содержимое переменной s.
Если строка Fatal: присутствует в переменной s, то происходит поиск позиции данной строки. Если позиция не равна 0, то происходит переход к следующему шагу. Если позиция равна 0, то происходит вывод на экран содержимого переменной s. Таким образом, в результате работы данного кода на экран будут выводиться строки, в которых отсутствует слово Fatal:.