Читайте также:
|
|
Приведем пример 1 записи на языке Паскаль выражение вида
Программная запись:
(А + 12.55*В)/(С2 – 1.87Е3) + GAMMA
В качестве операнда в выражении кроме констант и переменных можно использовать стандартные функции. Аргументы функций обязательно заключаются в круглые скобки. Приоритет вычисления стандартных функций выше, чем приоритет выполнения арифметических операций.
е
имеем следующую программную запись:
EXP (ABS (2* (SIN (4*X) + X) / (3*X)))
Пример 2. Составим простейшую линейную программу вычисления общей поверхности и объема круглого конуса, имеющего радиус основания R =12,54 см и длину образующей L = 24,88 см. При вычислении используем равенства:
S =
где Н – высота конуса, определяемая по формуле Н = .
Программа:
PROGRAM CONUS;
CONST
PI = 3.1415926;
VAR
R,L,H,S,V: REAL;
BEGIN
READ (L, R);
S: = PI*R*R + PI*R*L;
H: = SQRT (L*L – R*R);
V: = PI*R*R*H/3;
WRITELN (‘ПАРАМЕТРЫ КОНУСА’);
WRITELN (‘R =’,R,’L =’,L,’H =’,H);
WRITELN (‘ПОВЕРХНОСТЬ КОНУСА’);
WRITELN (‘S =’,S);
WRITELN (‘ОБЪЕМ КОНУСА’);
WRITELN (‘V =’,V);
END.
После заголовка программы в примере присутствует определения констант, обозначаемый служебным словом CONST. В этом разделе константа = 3,1415926 обозначается словом PI. Затем следует раздел описания переменных. В операторной части программы (после BEGIN) первый оператор – оператор ввода исходных данных L, R, которые в результате выполнения этого оператора получат свои числовые значения: R = 12,54; L = 24,88. В первом операторе присваивания вычисляется значение переменной S – полной поверхности конуса, во втором высота конуса, в третьем – объем конуса. Далее следуют операторы вывода на печать текстов, заключенных в апострофы, и значений переменных: R, L, H – во втором операторе вывода, S – в четвертом, V – в шестом. Для печати значений переменных в операторе WRITELN указываются их имена. Конец программы обозначается служебным словом END, после которого ставится точка.
Дата добавления: 2015-04-20; просмотров: 59 | Поможем написать вашу работу | Нарушение авторских прав |