Реализация стандартных структур

Лекция 12

 

Реализация стандартных структур

Задача. Реализовать на Фортране структуры и их частные случаи. Выполните эту работу самостоятельно, а потом проверьте полученные решения

 

№	Наименование структуры	Структура	Реализация
	Линейная		… Ф1 Ф2 …
	Выбор (стандарт)		IF (усл) GOTO 17 Ф2 GOTO 18 17 CONTINUE Ф1 18 CONTINUE
	Выбор (Фортран-77)		IF (усл) THEN Ф1 ELSE Ф2 ENDIF
	Односторонний выбор «истина» (стантарт)		IF (.NOT. усл) GOTO 18 Ф1 18 CONTINUE
	Односторонний выбор «истина» (Фортран-77)		IF (усл) THEN Ф1 ENDIF
	Односторонний выбор «ложь» (стантарт)		IF (усл) GOTO 17 Ф2 17 CONTINUE
	Односторонний выбор «ложь» (Фортран-77)		IF (.NOT. усл) THEN Ф2 ENDIF
	Односторонний выбор «истина» (элементарная операция)		IF (усл) Ф1
	Цикл итерационный		17 CONTINUE Ф1 IF (усл) GOTO 18 Ф2 GOTO 17 18 CONTINUE
	Цикл с предусловием		17 CONTINUE IF (.NOT. усл) GOTO 18 Ф2 GOTO 17 18 CONTINU
	Цикл с постусловием		17 CONTINUE Ф1 IF (.NOT. усл) GOTO 17
	Цикл с параметром		DO 17 i=1,n,1 Ф1 17 CONTINUE

12.2 Операции ввода/вывода

Ввод данных в программу осуществляется:

· с клавиатуры,

· из файла,

· с внешнего устройства (сканера, стриммера...)

Вывод данных из программы осуществляется:

· на экран монитора,

· в файл,

· на внешнее устройство (принтер, графопостроитель...)

Принятые имена устройств ввода/вывода в операционной системе MS-DOS:

· консоль (клавиатура при вводе, экран монитора при выводе) – CON,

· файл – полное имя файла,

· принтер – PRN.

12.3 Операторы ввода/вывода

Указывают, какие данные подлежат вводу или выводу, куда или откуда.

READ (<N устр.>,<M формата>)<список элементов>

WRITE(<N устр.>,<M формата>)<список элементов>

 

<N устр> – номер устройства ввода или вывода – целое число 1..99.

Если вместо номера устройства используется символ «*», то подразумевается CON.

Зарезервированные системой номера устройств:

5 - ввод с системного устройства ввода (в MS DOS – клавиатура);

6 - вывод на системное устройство печати (в MS DOS – экран монитора);

7 - вывод на системное перфокарточное устройство.

 

Каждому устройству сопоставлено системное имя по его номеру:

FTХХF001 - имя устройства номер ХХ (используется в системных сообщениях)

 

<M формата> - метка оператора формата (* – формат по умолчанию)

<список элементов> – последовательность объектов ввода или вывода.

Последовательность объектов ввода или вывода представляет собой последовательность через запятую переменных или констант, либо конструкций, описывающих последовательность переменных или констант. К конструкциям, описывающим последовательность переменных или констант, относится имя массива, обозначающее последовательность элементов массива, а также неявный цикл.

Неявный цикл представляет собой следующую конструкцию:

(<список выражений>, <параметр>=n1,n2,n3).

Такая запись обозначает последовательность объектов, полученных последовательными подстановками в выражения, стоящие в списке, значений параметра <параметр>, начиная со значения n1 до значения n2 с шагом n3.

Два особых оператора в/в:

READ<M формата>,<спис.элементов>=READ(5,<M форм>)<спис.элементов>

PRINT<M формата>,<спис.элементов>=WRITE(6,<M форм>) <спис.элементов>