При необходимости смены приоритета можно пользоваться круглыми скобками.

	Например, выражение	ay 2	+ x	* sin 2 t в Фортране имеет вид:
		bz 2	+u

SQRT((a*y**2+x)/(b*z**2+u))*SIN(t)**2

Если вместо квадратного корня стоит, например, кубический, то такая функция отсутствует, и необходимо выражение возвести в степень 1/3. При этом необходимо помнить о правилах расчетов между целыми и вещественными константами:

(((a*y**2+x)/(b*z**2+u))*SIN(t)**2)**(1./3.)

Простейшие операторы Фортрана

Оператор присваивания

Структура оператора: A=B

Здесь A - переменная; B - арифметическое выражение, значение которого присваивается переменной A. Например, последовательность операторов: x=1; y=3; z=2x+5y выполняется следующим образом. Сначала в условные ячейки памяти, соответствующие переменным x и y, будут записаны соответствующие константы. Затем процессор производит вычисление выражения 2*1+5*2, а результат (12) будет направлен в ячейку, соответствующую переменной z (рис. 7).

x1

y3 Процессор

z 12

Рис. 7. Иллюстрация работы оператора присваивания

Оператор ввода данных

Структура оператора: READ(*,*) A,B

Здесь READ(*,*) - имя оператора; A,B - список переменных, значения которых вводятся с клавиатуры. Первая звездочка в имени оператора указывает

36

на то, что ввод осуществляется с клавиатуры, а вторая – на то, что ввод бесформатный.

Например, рассмотрим работу оператора READ(*,*) x,y.

Компьютер, выполняя этот оператор, находится в ожидании ввода двух чисел. Ввод осуществляется с клавиатуры через запятую, по окончании ввода нужно нажать клавишу Enter. После этого в условные ячейки памяти x и y будут записаны соответствующие данные. В отличие от предыдущего оператора, эти данные могут меняться при повторном запуске программы.

Оператор вывода данных

Структура оператора: WRITE(*,*) 'текст',A,B

Здесь WRITE(*,*) - имя оператора, 'текст' - необходимые пояснения (могут отсутствовать), A,B - список переменных, значения которых выводятся на экран дисплея.

Например, пусть в процессе работы программы возникла ситуация, показанная на рис. 7, (x=1; y=3; z=12). Теперь запишем оператор WRITE(*,*) x,y,z. В этом случае на экране дисплея появится следующая информация:

1		3	12
Более наглядным является вывод с использованием текстовых фрагмен-
тов. В результате работы оператора
WRITE(*,*) ‘x=’,x,’y=’,y,’z=’,z
на экране дисплея появится следующая информация:
x= 1	y=	3	z= 12

Оператор окончания программы

Структура оператора: END

Ставится в конце программы и не может иметь метки.

37