1.2.8 Консоль- проект

Фортран динамично развивается и воплощен в стандартах Fortran 90, 95.

В работе версии: Fortran 2000 и 2003; Visual Fortran 5.0 (8.0; 10.0).

При подготовке работ был использован компилятор Microsoft Fortran PowerStation 4.0, который для краткости именуется FPS, и компилятор Visual Fortran 5.0 (DVF) Digital Equipment. Оба компилятора работают в среде MS Developer Studio. Кроме того, по соглашению с Microsoft в DVF можно использовать большинство расширений FPS над стандартом Фортран 90, что снимает практически все проблемы по переносу программ из FPS в DVF. Оба названных компилятора создают 32-разрядные приложения и работают под Windows NT и Windows XP. Оба компилятора обеспечивают полную поддержку стандарта Фортран 90; в то же время DVF включает все новшества Фортран 95.

Любая программа рассматривается как проект. Для запуска новой программы необходимо, прежде всего, создать проект. Могут быть созданы несколько типов проектов, однако на первых порах мы будем работать с консоль-проектом - однооконным проектом без графики.

Начнем создание проекта с запуска используемой для разработки программ оболочки - Microsoft Developer Studio (MDS). Далее выполним цепочку: File - New - Project – Win32 Console Application - ввести имя проекта - задать расположение проекта на диске Ok- finish. После нажатия кнопки Ok будет создана директория (папка), имя которой совпадает с именем проекта. B этой папке будут размещены файлы проекта.

Создадим теперь новый файл, выполнив File - New - File – Fortran free format – задаем имя файла - OK. Наберем текст программы и выполним компиляцию проекта: Build - Compile - и исправим обнаруженные ошибки, сообщения о которых вы найдете в нижнем окне. Создадим выполняемый ЕХЕ-файл: Build - Build. Запустим созданный ЕХЕ-файл: Build - Execute - и получим результат. Для выхода из рабочего окна нажмем любую клавишу.

Начнем с простого примера. Запишем программу, в которой задаются два действительных числа, вычисляется их сумма и выводится результат:

program p1 ! p1 - имя программы

real x, у, z ! Объявляем 3 переменные вещественного типа

x = 1.1 ! Присваиваем переменным x и у значения

y = 2.2

z = x + у ! Присваиваем z результат сложения x и у

print *, & ! Вывод результата на экран (Начальная строка)

'z = ' , z ! Результат вывода: z = 3.300000 (Строка продолжения)

end program p1 ! END - обязательный оператор завершения программы

Эта схема является типовой. Программа записана в свободном формате. По умолчанию файл с текстом программы в свободном формате имеет расширение F90.

Замечание. Помимо свободного формата программу можно записать и в фиксированном формате.

1.3 Задания к контрольной работе (часть 1)

В а р и а н т № 1

1). Данные математические выражения записать на ФОРТРАНе:

2). Представить математическую запись арифметического выражения и указать порядок действий: ALOG (2.) / A + B * SIN (V**2+U**2) / 2.7

3) Выражение записать в виде логического: | х | ≤ 1

В а р и а н т № 2

1). Данные математические выражения записать на ФОРТРАНе:

2). Представить математическую запись арифметического выражения и указать порядок действий: SQRT (SIN (3. X*X ) + 4.) - .2 / P**3

3) Выражение записать в виде логического: 0 ≤ х ≤ 1.5

В а р и а н т № 3

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий: A ** (-B * 2.) / 3. + ALOG10(ABS (- X + 3. * Y ** 2))

3) Выражение записать в виде логического: T є [1073, 1673]

В а р и а н т № 4

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий: 3.17 * x ** 5 / (2.7 E – 3 * A + SQRT( 1. + EXP(-X )))

3) Выражение записать в виде логического: 0 < p ≤ 10 ^{– 8}

В а р и а н т № 5

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий: SIN (5. * X) ** 2 – 1. / 3. ** SQRT ( X + Y) * 4.8

3) Выражение записать в виде логического: X + Y ≥ C + D

В а р и а н т № 6

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий: ATAN (X ** 2) + COS (X) ** 2 / 2. * (1. - Y)

3) Выражение записать в виде логического: X < 0 ^ Y > 0

В а р и а н т № 7

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий. ( X / A ** 2 ) ** 3 TAN (R / 2.) + 2. / (X- A ** 2)

3) Выражение записать в виде логического: -1 < X ≤ 1

В а р и а н т № 8

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий: (A +B) + (C + D/ (X + Y )) – ABS (X - Y) * 2.

3) Выражение записать в виде логического: 3 ≤ X < 4

В а р и а н т № 9

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий: 4. * COS (X * X) ** 2 – 1. + 4. / 3. / Y * Z ** 2

3) Выражение записать в виде логического: 0 < X ≤ 3 ^ -1 < Y < 1

В а р и а н т № 10

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий. - 3.4 + A * SIN (A + B * 2) ** 3. / 2. - X

3) Выражение записать в виде логического: 1,5 < X ≤ 3 v 3 < X ≤ 5

В а р и а н т № 11

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий: X **Y / Y ** Z ** 2 + EXP ( - X * 2.) / 4.

3) Выражение записать в виде логического: 0 < p ≤ 10 ^{– 8}

В а р и а н т № 12

1). Записать на Фортране следующие выражения:

2). Представить математическую запись арифметического выражения и указать порядок действий: 2. / 3. * A + B * COS (3. * X ** 2) / 27.8 - Y

3) Выражение записать в виде логического: 3 ≤ X < 4