Помогите составить листинг программы в паскале.
Создать файл F вещественных чисел. Найти максимальную
компоненту и дописать её в конец файла исходную максимальную
компоненту уменьшить в два раза. Далее сформировать файл H , записав в
него каждую вторую компоненту файла F . Файлы распечатать.