Читайте также:
|
|
№ п/п | Арифметические | Логические | Отношения | Другие |
*, /, div, mod +,- | NOT аnd,shl,shr, оr, xor | <=,>=,<>,<,>,= | @ адресное преобразование in |
Для реализации лабораторных работ необходима среда Borland Pascal версии 7.0. Ее запуск производится через файл bp.exe (BP7\BIN\bp.exe).
Пример 1. Вычислить площадь прямоугольника по размерам его сторон А и В. Обозначим площадь переменной S, тогда необходимо найти S=A*B.
Программа набирается в окне редактора и компилируется [F9]:
Program RECT; {заголовок программы с именем RECT}
const {блок описания констант}
A=2; B=3; {определение констант А и В}
var {блок описания переменных}
S:integer; {определение переменной S целым типом}
begin {начало основного блока программы}
S:=A*B; {оператор присваивания}
write('Площадь прямоугольника = ',S); {процедура вывода}
end. {конец основного блока}
В результате выполнения программы (Ctrl+F9) на экран выводится сообщение:
Площадь прямоугольника = 6.
Пример 2. Найти площадь равностороннего треугольника. Если стороны треугольника имеют размер А, то его площадь S = A2 sin(π/3)/2. Схема алгоритма (СА) реализации этой задачи (рис.1) выполнена по ГОСТ 19.701-90 (прил.1).
Текст программы
Дата добавления: 2015-09-05; просмотров: 60 | Нарушение авторских прав
<== предыдущая страница | | | следующая страница ==> |
Этап программирования. | | | Program TREUG; |