- •«Информатика» программирование на фортране
- •Часть 1
- •От автора
- •Содержание
- •1. Константы
- •2. Типы констант
- •3. Переменные
- •4. Типы переменных
- •5. Операторы описания
- •6. Арифметические операции Операции по приоритету:
- •7. Расположение текста программы на экране дисплея
- •Правила набора текста программ:
- •Правило:
- •4 Write(6,*)’ Введите значения сторон треугольника a,b,c’
- •8. Технология прохождения фортран – программ на эвм
- •Технология прохождения фортран – программ на эвм
- •9. Арифметический оператор if
- •If(арифметическое выражение) m1, m2, m3
- •Примечание:
- •Правило:
- •Оператор, следующий после if арифметического должен иметь метку;
- •If арифметический не может быть последним оператором в цикле do.
- •4 Write(6,*)’ Введите значения сторон треугольника a,b,c’
- •8 Write(6,*)’ Площадь треугольника равна нулю’
- •9 Write(6,*)’ Такой треугольник не существует’
- •10. If логический
- •If(логическое выражение) выполняемый оператор
- •70% Ошибок у программистов возникает из-за несоответствия типов переменных!.
- •Условные обозначения логических операторов на блок-схемах
- •If арифметический if логический
- •11. Табулирование функции
- •12. Оператор цикла do
- •Внимание:
- •Примечание:
- •3 Write(6,*)’Введите переменные a,b,c’
- •13. Массивы
- •Примечание:
- •Вычисление определенного интеграла
- •1 Write(6,*)’Введите значения a,b,dx’
- •14. Работа с одномерными массивами Ввод массивов
- •Первый способ ввода массивов:
- •Второй способ ввода массивов:
- •Третий способ ввода массивов:
- •15. Вывод массивов Первый способ вывода массива
- •Второй способ вывода массива:
- •Третий способ вывода массива:
- •Четвёртый способ вывода массива:
- •Способ вывода массива в два столбца:
- •Фрагменты задач с одномерными массивами
- •If(b.Eq.K) write(6,*)’ Число m является чётным’
- •Сортировка массива
- •Второй способ сортировки массива:
- •16. Конструкция if then–else if then–else – end if
- •If (логическое выражение 1) then
- •Правила:
- •Примечания:
- •17. Оператор data
- •Правило:
- •По очерёдности следования
- •По типу данных.
- •Правило:
- •18.Работа с двухмерными массивами
- •19. Ввод двухмерного массива
- •Второй способ ввода массивов:
- •Третий способ ввода массивов:
- •Четвертый способ ввода массивов:
- •Фрагменты задач с двухмерными массивами
- •20. Вывод двухмерного массива
Второй способ ввода массивов:
READ(5,*) (A(I),I=1,10)
Здесь ввод массива осуществляется при помощи неявного цикла DO, где I изменяется от 1 до 10 с шагом 1
Достоинство: таким способом можно ввести весь массив целиком или часть этого массива, что весьма удобно использовать в программе, когда необходимо массив заполнить не полностью, а частично.
Недостатки:
нет возможности задавать количество вводимых элементов (т.к. это количество указывается в программе как постоянная величина) и для того, чтобы можно было ввести любое количество необходимо делать изменения в программе.
Третий способ ввода массивов:
READ(5,*) N
READ(5,*) (A(I),I=1,N)
или аналогичное: READ(5,*) N,(A(I),I=1,N)
Сначала вводится число N, обозначающее количество вводимых элементов массива, а затем вводится N–ное количество элементов массива.
Достоинства: используя такой ввод массивов, можно создать программы не для конкретных случаев, а для разных, когда количество данных и сами данные задаёт пользователь.
данный способ позволяет ввести только необходимое количество элементов при любых размерах массивов.
Ограничение: значение N не должно превышать размерность массива.
15. Вывод массивов Первый способ вывода массива
WRITE(6,*) A
При бесформатном упрощенном выводе массива А на экран дисплея выведутся значения всех элементов массива, количество которых было описано в операторе DIMENSION. В каждой строке печатается по 5 чисел в виде:
-0.1234567Е-01
т.е. с точностью до 7 знаков после запятой.
Недостатки:
выводятся все элементы массива и при большой размерности массива первые элементы выведутся на экран, но будут недоступными для просмотра, т.к. сдвинутся при выводе остальных элементов;
при выводе массива не выводятся никакие пояснения (ни имени массива, ни порядкового номера элемента массива);
при выводе нескольких массивов будет непонятно, где закончился первый и начался второй массив.
Достоинство:
Простота использования.
Второй способ вывода массива:
WRITE(6,*) (A(I),I=1,N) , где N – заданно ;
Достоинства:
позволяет вывести только часть массива;
количество выводимых элементов задаётся пользователем;
Недостатки:
нет никаких пояснений к выводимым числам (имя массива и порядковый номер);
элементы выводятся на экран по 5 чисел в каждую строку.
Третий способ вывода массива:
WRITE(6,*) (‘A(’,I,’)=’,A(I),I=1,N)
Здесь используется неявный цикл типа DO, по которому происходит вывод имени массива с помощью текстовой константы, а за ним в скобках указывается номер выведенного элемента и через знак ‘=’ само численное значение элемента массива:
А(…1)=число А(…2)=число и т.д.
Недостаток:
весь массив будет разбросан по экрану дисплея.
Достоинство:
имеется возможность каких либо пояснений.
Четвёртый способ вывода массива:
В этом способе используется внешний цикл DO.
DO 18 I=1,N
18 WRITE(6,*) ’A(‘,I,’)=’,A(I)
текстовая константа № цикла текстовая константа значение элемента массива
Этот способ отличается от предыдущих трёх способов тем, что вместо неявного используется внешний цикл DO. В этом цикле оператор WRITE срабатывает N-ное количество раз и соответственно печатает N-ное количество строк. В каждой строке печатается текстовая константа с именем массива и символом ”(”, номер цикла, затем печатается текстовая константа “)=” и потом числовое значение элемента массива.