7.5 Задание к лабораторной работе №7

7.5.1 С помощью любого DOS-редактора (рекомендуется FAR-manager) составить программу на языке Фортран, в которой следует объявить массивы комплексных чисел X, Y, Z1 и Z2. Содержимое массива Y должно соответствовать матрице по п. 1.5.2 задания к лабораторной работе №1. Вариант этого задания определяет и размерность данного массива. МассивX имеет такую же размерность, как и массив Y и состоит по диагоналииз мнимых единиц 0.0+1.0i, а остальные элементы этого массива должныбыть равны нулю. Построить алгоритм данной программы следующим образом:

- с помощью двух циклов сформировать массив X;

- с помощью двух циклов и операторов PRINT и READ под управлением списка организовать ввод значений массива Y с клавиатуры;

- с помощью обычного цикла и вложенного в оператор PRINT циклаорганизовать поочередно форматный вывод матриц X и Y как на экран,так и в файл. Для вывода использовать следующий оператор FORMAT:

FORMAT(А(2X,F7.3,'+',F7.3,'i'))

где А – число, равное размерности строки матрицы;

- используя подпрограмму MATRIX2 (см. описание подпрограмм вприложении Б), выполнить умножение массива Y на массив X с выводом

результирующего массива Z1 на экран и в файл;

- используя подпрограмму MATRIX1, выполнить сложение массива Yс массивом Z1 с выводом результирующего массива Z2 на экран и в файл.

Файл программы сохранить с расширением .for в корневом каталогеFORTRAN, в соответствии с приложением В выполнить компиляцию, компоновку и выполнение данной программы. Рекомендуется сначала отладитьпрограмму без записи результатов в файл, а затем дополнить ее командами работы с файлами. После выполнения программы и получения результатов программу и результаты сохранить на диске в каталоге результатов.

7.5.2 Составить следующую программу на языке Фортран для расчетамомента асинхронного двигателя:

C PROGRAMM MOMENT

REAL M

DATA SM/Х.ХХ/,S/0.0/

PRINT 1

1 FORMAT(19X,'РЕЗУЛЬТАТЫ РАСЧЕТА МОМЕНТА'/

*17X,'СКОЛЬЖЕНИЕ',13X,'МОМЕНТ')

DO 2 I=1,20

S=0.05*I

M=2/(S/SM+SM/S)

PRINT 3,S,M

3 FORMAT(15X,E12.5,8X,E12.5)

2 CONTINUE

END

При этом значения числа X.XX в операторе DATA принять по вариантам, согласно таблице:

Таблица 7.1 – Значения X.XX в операторе DATA

Последняя цифра зачетной книжки	0	1	2	3	4	5	6	7	8	9
Х.ХХ	1,22	1,24	1,26	1,28	1,30	1,32	1,34	1,36	1,38	1,40

Файл данной программы также сохранить с расширением .for в корневом каталоге FORTRAN, в соответствии с приложением В выполнитькомпиляцию, компоновку и выполнение данной программы. После отладкипрограммы дополнить ее командами записи результатов в файл в видедвух столбцов данных без текстовых комментариев. Файл результатовдолжен иметь расширение .dat с целью последующего его использованияв лабораторной работе №9 без предварительных доработок. После выполнения программы и получения результатов программу и результатысохранить на диске в каталоге результатов.

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

7.6.1 Титульный лист.

7.6.2 Цель и программа работы.

7.6.3 Задание на выполнение работы.

7.6.4 Результаты выполнения работы.