Лабораторная работа № 20. Типизированные файлы: числовые данные Вариант 11 Pascal

1. Решить задачу с использованием структуры «файл» (в файле хранятся целочисленные данные). Протестировать программу (2-3 набора тестов) (3 балла)

11.Найти произведение максимального и второго по счёту отрицательного элемента. Если искомого элемента нет, сообщить об этом.

Решить задачу с использованием структуры «файл». Протестировать программу (2-3 набора тестов) (3 балла)
Записать в файл последовательного доступа n элементов последовательности  Вывести на печать те компоненты файла, для которых выполняется |bn| > e, где e — заданное число.