ВВЕДЕНИЕ В ФОРТРАН
Как пользоваться этим руководством.
Концепция данных Фортрана.
Типы и буквальные константы.
Имена (идентификаторы).
Переменные и константы.
Скаляры и массивы.
Именование данных.
Печать текста и чисел на экран.
Hello World!
Печать целых чисел.
Печать вещественных чисел.
Печать текста.
Когда format предпочтительней.
Арифметические и текстовые выражения.
Арифметические операторы и правила.
Вещественная арифметика.
Целая арифметика.
Смешанная арифметика.
Текстовые выражения.
Инициализация переменных и констант.
Оператор присваивания.
Инициализация скалярных констант.
Инициализация массивов констант.
Ввод данных с клавиатуры.
DATA-инициализация скалярных переменных.
DATA-инициализация массивов переменных.
Условные опреаторы.
Логические выражения.
Оператор IF.
Конструкция IF.
Конструкция CASE.
Циклы.
Цикл с фиксированным числом повторений.
Цикл с выходом по условию.
Пресловутый GOTO.
Неявные циклы.
Процедуры и функции.
Подпрограммы-процедуры.
Подпрограммы-функции.
Комплексный пример: сортировка массива.
Встроенные функции Фортрана.
Работа с внешними файлами.
Файловый ввод/вывод.
Открытие/закрытие файла.
Позиционирование файла.
ПЕЧАТЬ ВЕЩЕСТВЕННЫХ ЧИСЕЛ.
Программа REPRN демонстрирует печать вещественных констант, точно так же можно выводить на печать и другие вещественные данные.
В записи вещественных буквальных констант нулевая целая или дробная часть, как правило, опускаться. Например, "1.0" записывается как "1.", а "0.1" записывается как ".1".
program REPRN
c Печать чисел с плавающей точкой в формате "по умолчанию"
print*, 1.23, -45.6789
c Печать в формате с плавающей точкой
print'(1x,f4.2,1x,f8.4)', 1.23, -45.6789
c Печать в формате с фиксированной точкой
print '(1x,e8.3,1x,e12.6)', .123E+00, -.456789E+02
c Печать в формате с фиксированной точкой
c с использованием масштабного множителя и коэффициента повторения
print '(1p,2(1x,e12.5))', 1.23000E+00, -4.56789E+02
end
Для печати вещественных данных в формате с плавающей точкой используется дескриптор "F", после которого указывается общее число символных позиций, отводимых для печати числа (включая знак), а затем число символьных позиций, отводимых под дробную часть. Так для вещественной константы "1.23" подойдет спецификация формата "f4.2".
При печати вещественных данных в формате с фиксированной точкой используется дескриптор "E". Для него указывается те же параметры, что и для "f", однако, подразумевается что под десятичную экспоненту всегда зарезервировано последние 4 символа, а целая часть всегда равна нулю (все значащие цифры смещаются в дробную часть). Например для вещественной константы ".123E+00" подойдет формат "e8.3". Если по такому формату вывести значение "2.345", то на экране это отобразится буквальной константой ".235E+01" (с учетом округления до трех значащих цифр).
Доволно часто возникает ситуация, когда несколько данных одного типа необходимо вывести подряд, в одном и том же форматном представлении. Для того, чтобы не повторять одни и те же спецификации формата используют коэффициент повторения.
Коэффициент повторения может применяться к одиночной спецификации, например "2e12.6" или к группе спецификаций, заключенных в круглые скобки: "2(1x,e12.6)".
Чтобы при выводе данных в формате с фиксированной точкой целая часть была представлена несколькими значащими цифрами, используют масштабный множитель, для его записи используется дескриптор "P". Целая константа перед дескриптором указывает, сколько значащих цифр должна содержать целая часть числа. Масштабный множитель действует на все спецификации формата с фиксированной точкой, записанные справа от него.