4. Решение задач с одномерными массивами Задание

Написать программу,в которой:

1. Ввести 12 вещественных чисел из файла in.txtв одномерный массив и вывести этот массив в результирующий файл out.txt.

2. Дополнительные параметры, если они есть в варианте задания, ввести в диалоге с клавиатуры и вывести в файл out.txt.

3. Вычислить значения трех переменных, которые входят в состав выражения, и значение выражения.

4. По мере вычисления переменных и выражения выводить их значения в файл out.txt, поясняя фразами из индивидуального задания.

Комментарии к заданию

1. При подготовке исходных данных в файле In.txt воспользуйтесь любым текстовым редактором. Для отладки в файле подготовьте числа, значения которых соответствуют индивидуальному заданию - среди них должны быть числа отрицательные, положительные, большие D и т. д.

2. Исходные данные и результаты выводите в файл out.txtтолько по формату.

3. Если вычисление какой-либо переменной невозможно из-за отсутствия в массиве подходящих элементов, вывести соответствующее сообщение (смотри пример программы).

4. Все переменные, используемые как индексы элементов массива и счетчики, должны быть целоготипа.

5. Имена переменных в программе не должны совпадать с именами встроенных функций Фортрана.

Содержание отчета

1. Название работы и номер варианта задания.

2. Фамилия, имя, отчество и номер группы студента.

3. Текст варианта индивидуального задания.

4. Единаяблок-схема программы,cоставленная из фрагментов.

5. Распечатка текста программы.

6. Распечатка файла out.txt.

Справочная информация

Таблица 9.

Средние значения множества вещественных чисел а₁, а₂, а₃, …, а_n

Среднее арифметическое
Среднее геометрическое
Среднее квадратичное
Среднее гармоническое	где ai 0, n – количество ненулевых элементов

Пример

В массиве Mиз 12 вещественных чисел (должны быть отрицательные, положительные и равные нулю) найти:

1. A– среднее арифметическое отрицательных элементов, большихD(D<0, ввести с клавиатуры),

2. B– номер минимального положительного элемента,

3. C– среднее гармоническое ненулевых элементов с четными номерами.

Вычислить Z = A + B – C.

Блок-схемы

Далее приведены 3 фрагментаблок-схемы программы. Для отчета следует из фрагментов составитьединуюблок-схему программыVector.

Рис.4. A– среднеарифметическое отрицательных, больших D* - сообщение: «В массиве нет отрицательных элементов, больших D»

Рис.5. B – номер минимального положительного элемента ** - сообщение: «В массиве нет положительныхэлементов»

Рис.6. C – средне гармоническое ненулевых элементов с четными номерами *** - сообщение: «Все элементы массива с четными номерами = 0»

Программа (пример)

Program Vector

! студент (фамилия, имя) группа № работа № вариант №

Implicit None

Real,dimension(1:12):: M

Real:: A, C, D, Z

IntegerB, i, Notr, Cnt

Open(1,FILE=’In.txt’)! файл с исходным массивом

Open(2,FILE =’Out.txt’)! результирующий файл

Write(2,*) ’ПрограммаVector’

Read(1,*)M! ввод массива

Write(2,10) M ! вывод массива в 2 колонки с заголовком

10 Format (?????)! допишите оператор Format

Write(*,*) ’Input D < 0’ ! диалог для ввода значения D <0

Read(*,*) D

Write(2,14) ’D =’, D, ’- должно быть отрицательным’

14 Format (?????)! допишите оператор Format

! *****

По блок-схемам, составленным с учетом индивидуального задания, написать операторы программы Vector для вычисления и форматного вывода трех переменных и результирующего выражения. Выводить значения переменных по мере их вычисления, поясняя формулировками из индивидуального задания.

! *****

End Program Vector

Результаты программы Vector

Содержимое файла Out.txtв результате работы программыVectorдля приведенного примера задания, пояснения пишите по-русски:

Программа Vector

Исходный массив

   6 строк в 2 колонки

D = -12.00 -должно быть отрицательным

A = -17.05 -среднее арифметическое элементовD<M<0

B = 10 - номер минимального положительного элемента

C = 25.13 -средне гармоническое элементов с нечетными номерами

Z = 34.77 = A + B – C