Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Consp_p1.rtf
Скачиваний:
12
Добавлен:
22.08.2019
Размер:
7.3 Mб
Скачать

7. Расположение текста программы на экране дисплея

В языке FORTRAN имеются определённые правила, которых следует придерживаться при наборе программы на компьютере.

Правила набора текста программ:

В одной строке на экране дисплея можно разместить 80 символов. Текст программы записывается с 7 позиции и по 72.

1 2 3 4 5 |6| 7………………………………………72|73

Текст, расположенный после 72 позиции, на экране будет виден, но транслятором восприниматься не будет.

1-5 позиции – располагаются метки операторов.

6 позиция – для размещения символа продолжения строки. Если в 6-ой позиции строки размещаются символы отличные от “пробела ” то эта строка является продолжением предыдущей. При этом в предыдущей строке никаких знаков переноса не ставится. Для указания строки продолжения чаще всего используется символ “*”. Всего может быть 19 строк продолжения.

Если в 1-й позиции строки размещается латинская буква C или символ “*” или “!”, то это строка комментариев. Она служит для внесения поясняющего текста в программу.

В качестве поясняющего текста может быть любая информация - она транслятором не воспринимается, а служит для читаемости программы при последующих просмотрах её текста. Все операторы в программе выполняются поочередно сверху вниз. Для изменения очередности применяются операторы управления.

Цифры, внесённые с 1 по 5 позицию, являются метками оператора.

Метка оператора – это число, содержащее до 5 символов, которые обозначают условный номер оператора. Метки ставят не на все операторы, а только на те, на которые будут ссылки в программе. Назначение меток: метки дают возможность обращаться к нужной строке программы из любого места этой программы.

Правило:

В одной программе не может быть двух одинаковых меток.

Номера меток ставятся в произвольном порядке.

Обязательно должны быть метки после операторов GOTO и IF арифметического.

Задача:

Составить программу для вычисления площади треугольника по формуле Герона

где

В качестве исходных данных служат значения сторон треугольника a,b,c которые при выполнении программы нужно будет ввести с экрана дисплея как три вещественных числа. При вводе данные отделяются друг от друга запятыми или символами пробел.

В процессе работы программы необходимо вычислить значение площади S и вывести это значение на экран.

При составлении и наборе программы следует не забывать обо всех правилах языка FORTRAN, описанные выше.

1 2 3 4 5 |6|7 72|73

C Программа № 1 – Вычисление площади треугольника

4 Write(6,*)’ Введите значения сторон треугольника a,b,c’

Оператор WRITE служит для вывода информации. В данном случае на экран дисплея (т.к. стоит цифра 6). Символ * означает, что вывод бесформатный (упрощённый)

При выполнении этого оператора на экране дисплея появится приглашение к вводу информации: ‘Введите значения сторон треугольника A,B,C(желательно все программы снабжать такой строкой).

READ(5,*) A,B,C

READ служит для ввода информации. A,B,C – список имен переменных которые необходимо ввести. 5 – канал экрана дисплея. Символ “*” – бесформатный упрощенный вывод (ввод).

Данная строка расшифровывается так: ввести с экрана дисплея числовые данные для переменных A,B,C.

P=(A+B+C)/2. Сложить значения переменных, хранящихся в переменных А, В,С, разделить на 2 и результат записать в переменную Р.

S=SQRT (P*(P-A)*(P-B)*(P-C)) Вычисляется значение переменной S.

WRITE (6,*)Площадь треугольника со сторонами A,B,C,’ равна’,S

Выводится информация, находящаяся в списке вывода за скобками оператора WRITE. На экране появится текст Площадь треугольника со сторонами, затем численные значения переменных А,В,С, затем текст равна и численное значение переменной S.

GO TO 4 Этот оператор осуществляет переход на метку 4 в начало программы. Таким образом зацикливается ввод новых исходных данных для вычисления площади другого треугольника.

6 STOP

END Операторы STOP и END осуществляют стандартное завершение программы. Поскольку оператор STOP расположен после GO TO, то он должен иметь метку (хотя в программе на метку 6 и нет ссылок).

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]