Решаем задачи Абрамян на Паскале. Array133

Array133. Дано множество $$A$$ из $$N$$ точек (точки заданы своими координатами $$x$$, $$y$$). Среди всех точек этого множества, лежащих в первой или третьей четверти, найти точку, наиболее близкую к началу координат. Если таких точек нет, то вывести точку с нулевыми координатами.

Решаем задачи Абрамян на Паскале. File9

File9. Даны имена двух файлов вещественных чисел. Известно, что один из них (не обязательно первый) существует и является непустым, а другой в текущем каталоге отсутствует. Создать отсутствующий файл и записать в него конечный и начальный элементы существующего файла (в указанном порядке).