Автор неизвестен - Знакомство с FreePascal

которое означает, что исходное число надо умножить на 10 в указанной
степени. Например, число 1.23e2 означает просто 123, а 1e-6 означает одну миллионную.
В большинстве языков программирования, и Pascal не является исключением, нельзя использовать в выражениях
слишком большие целые или вещественные числа. Более того, диапазон используемых чисел зависит от компьютера,
операционной системы и компилятора. В пределах этого диапазона, т. е. если исходные числа и все промежуточные
результаты попадают в этот диапазон, арифметические действия с целыми числами выполняются точно. Если же
исходные числа или промежуточные результаты выходят за пределы этого диапазона, результат будет неверным,
причем система не всегда сообщает об этом программисту. Чтобы она сообщала, для целых чисел, в начало программы
надо поместить управляющий комментарий {$Q+}. Для вещественных чисел используется специальное значение,
означающее «бесконечно большое число».
Даже если все исходные числа и промежуточные результаты в выражении с вещественными числами лежат в допустимых пределах, все равно вычисления с вещественными числами выполняются лишь приближенно. Это происходит
по ряду причин. Во-первых, даже такое, казалось бы, нехитрое вещественное число, как одна десятая, не может быть
представлено в компьютере точно, поскольку в памяти компьютера вещественные числа представляются конечными
двоичными дробями, а одна десятая так представлена быть не может (чтобы получить одну десятую, нужно поделить
не только на 2, но и на 5, а этого уже конечные двоичные дроби не умеют). Далее, число двоичных цифр в этих дробях ограничено, поэтому неизбежно необходимо округление результатов (например, при умножении точный результат
должен содержать примерно в два раза больше цифр, чем каждый из операндов).
В выражениях также можно использовать обычные арифметические операции, такие как сложение, вычитание,
умножение и деление. Для умножения правила несколько отличаются от математических: в качестве значка для умножения используется звездочка, и пропускать его нельзя. Кроме того, для целых чисел имеются две дополнительные
операции: div (неполное частное) и mod (остаток от деления), которые дают целый результат. Также, разумеется,
можно использовать скобки, но только круглые (смысл квадратных скобок будет ясен несколько позже).
Для вещественных чисел также можно использовать элементарные функции, названия некоторых из них отличаются от принятых в математике:

Функция
синус
косинус
тангенс*
арксинус*
арккосинус*
арктангенс
гиперболический синус*
гиперболический косинус*
гиперболический тангенс*
гиперболический арксинус*
гиперболический арккосинус*
гиперболический арктангенс*
экспонента
натуральный логарифм
квадрат
степень*
квадратный корень
корень*

Запись
математика язык Pascal
sin x
sin(x)
cos x
cos(x)
tg x
tan(x)
arcsin x
arcsin(x)
arccos x
arccos(x)
arctg x
arctan(x)
sh x
sinh(x)
ch x
cosh(x)
th x
tanh(x)
arcsh x
arsinh(x)
arcch x
arcosh(x)
arcth x
artanh(x)
ex
exp(x)
ln x
ln(x)
x2
sqr(x)
xy
power(x,y)
√
x
sqrt(x)
√
y
x
power(x,1/y)

Здесь знаком «*» помечены те функции, для использования которых необходимо подключить модуль math (т. е. в
начале программы, после указания ее имени, нужно написать uses math;). Остальные функции этого не требуют.
Пример 1. Следующая программа вычисляет выражение
sin 5 + 1.752
3ecos 7
и выводит его результат на экран.
program Calculate;
begin
writeln((sin(5)+sqr(1.75))/(3*exp(cos(7)))); readln
end.
Иногда бывает удобно вывести подсказку, описывающую выводимое число. Это можно сделать, например, так:
program Calculate;
begin
writeln(’Result=’);
writeln((sin(5)+sqr(1.75))/(3*exp(cos(7)))); readln
end.
Чтобы и подсказка, и результат вывелись на одной строке, можно написать так:
program Calculate;
begin
write(’Result=’);
writeln((sin(5)+sqr(1.75))/(3*exp(cos(7)))); readln
end.
А можно и так:
program Calculate;
begin
writeln(’Result=’, (sin(5)+sqr(1.75))/(3*exp(cos(7)))); readln
end.
Иногда также бывает удобно, особенно при выводе таблиц, задавать ширину поля (т. е. места на экране, куда
будет выведено число). Если выводимое число занимает меньше места, оно будет дополнено пробелами спереди. Это
делается так:
program Calculate;
begin
writeln(’Result=’, (sin(5)+sqr(1.75))/(3*exp(cos(7))):15); readln
end.
В данном случае ширина поля равна 15 символам. Для вещественных чисел, кроме того, удобно задавать точность, с
которой выводится результат. Для этого добавляется еще символ : и за ним — требуемое число знаков после --">