Типы данных
Преобразование числовых типов
а – целого, вещественного или комплексного типов.
Оператор write также используется при работе с файлами, имеется возможность обработки ошибок.
Операция присваивания
k = k+1 ! увеличение значения на 1 k = k-1 ! уменьшение значения на 1 k = 2*k ! увеличение в 2 раза k = k/2 ! уменьшение в 2 раза k = -k ! смена знака s = s+k ! увеличение s на k s = s-k ! уменьшение s на k s = s*k ! увеличение s в k раз s = s/k ! уменьшение s в k раз tmp = a ! поменяли местами значения переменных a и b a = b b = tmp
Логический тип
! ---------------------- переменные logical(4) :: st = .FALSE. logical :: res = .TRUE.
Переменные-флаги, проверки наступления событий, конструкции if.
Операции отношения
| Операция | Имя |
|---|---|
| > или .GT. | больше |
| < или .LT. | меньше |
| == или .EQ. | равно |
| /= или .NE. | не равно |
| >= или .GE. | больше либо равно |
| <= или .LE. | меньше либо равно |
Операция AND
Логическое умножение, конъюнкция.
(x>-5).AND.(x<5).AND.(y>-3).AND.(y<3)
Операция OR
Логическое сложение, дизъюнкция.
(x>-5).AND.(x<0).AND.(y>0 ).AND.(y<3).OR. & (x>0 ).AND.(x<5).AND.(y>-3).AND.(y<0)
Операция XOR
Логическое исключающее "или", строгая дизъюнкция.
(x>-5).AND.(x<5).AND.(y>-3).AND.(y<3).XOR. & (x>-2).AND.(x<2).AND.(y>-1).AND.(y<1)
Операция NOT
Логическое отрицание, инверсия.
.NOT.((x>-2).AND.(x<2).AND.(y>-1).AND.(y<1))
Операции эквивалентности
(x>-5).AND.(x<5).AND.(y>-3).AND.(y<3).EQV. & (x>-2).AND.(x<2).AND.(y>-1).AND.(y<1)
Символьный тип
Объявления переменной для хранения 1 символа.
character key character(1) ch character(LEN = 1) symbol
Объявления строки для хранения 100 символов.
character(100) str character word*100 character(LEN = 100) path
Имена файлов, обработка клавиш, внутренние файлы, любая текстовая информация.
Объявления символьных констант.
character, parameter :: key = 'A' character(1), parameter :: ch = "Q" character(100), parameter :: str = "C:\" character(LEN = 11), parameter :: path = "D:\data.txt"
Присваивание символьных значений.
str = ' It''s very good! ' ! '' 1 апостроф adr = '"TEXT"' ! "TEXT"
С - строки
Cимвольная константа заканчивающаяся символом C.
character(100) cstr cstr="Fortran & C++"C ! cstr – С-строка
Управляющие символы в С-строках:
\\ – слеш;
\а – звуковой сигнал;
\b – на 1 символ назад;
\n – новая строка;
\t – горизонтальная табуляция;
и другие.
Операции со строками
// - конкатенация (сцепление, соединение) строк.
character a*5, b*2, c*20 ... a = 'AAAAA' b = '..' c = a//b//a ! AAAAA..AAAAA
Обращение к подстроке, нумерация с единицы.
character (100) str, substr str = '1234567890' substr = str(1:3) ! 123
Процедуры обработки строк
| Процедура | Описание |
|---|---|
| len(str) | длина строки |
| len_trim(str) | длина строки без хвостовых пробелов |
| index(str,sub) | номер первого вхождения строки substr в строку str |
| iachar(ch) | ASCII-код символа |
| achar(code) | возврат символа с кодом code |
| getcharqq() | возврат нажатого символа |
| peekcharqq(x) | определение нажатия клавиши |
* Полный перечень, тип результата, тип аргумента и подробное описание функций см. HELP.
** использование процедур требует подключения модуля iflib use iflib ! Intel Fortran Library