дано 18 чисел типа real.
найти среднее арифметическое всех додатнии чисел если 18-е число больше единицы.
иначе напечатать значение 18-ого числа.
Входные данные для программы считать из текстового файла IN.TXT (формат произвольный)
Полученный результат записать в файл OUT.TXT и одновременно вывести на экран в формате
задан: <значение входных данных>
результат: <значение результатов>
В чем именно должна заключаться наша помощь? Что непонятно? Файл открывать для чтения/записи умеешь? Читать из файла данные умеешь? Что не получается в выполнении задачи?