Функции на языке паскаль таблица. Стандартные функции Pascal
4.3. Стандартные функции в Turbo Pascal 7
В языке Паскаль существует ряд заранее разработанных подпрограмм-функций, которые можно использовать как готовые объекты. В Turbo Pascal их количество увеличено по сравнению со стандартом языка, и все они объединены в стандартные модули (см. п. 16). В данном разделе рассмотрены наиболее часто используемые стандартные функции. Стандартные функции ввода-вывода и динамического распределения памяти описаны в пп. 11 и 7 соответственно. Другие стандартные функции (работы со строками, указателями и адресами и т. д.), а также более подробное рассмотрение всех упомянутых выше функций, приведены в п. 16.
4.3.1. Арифметические функции
Арифметические функции можно использовать только с величинами целого и ипцественного типа. Их перечень приведен в табл. 4.
Таблица 4. Арифметические функции
| Функция | Назначение | Тип результата |
| Abs(X) | Абсолютное значение аргумента | Совпадает с типом X |
| Arctan(X) | Арктангенс аргумента | Вещественный |
| Cos(X) | Косинус аргумента | Вещественный |
| Ехр(Х) | е x | Вещественный |
| Frac(X) | Дробная часть числа | Вещественный |
| Lnt(X) | Целая часть числа | Вещественный |
| Ln(X) | Натуральный логарифм | Вещественный |
| Pi | Значение величины Pi=3.1415926535897932385 | Вещественный |
| Sin(X) | Синус аргумента | Вещественный |
| Sqr(X) | Квадрат аргумента | Совпадает с типом X |
| Sqrt(X) | Квадратный корень аргумента | Вещественный |
Примечание. Если функция используется с ключом компилятора {$N+}, то вместо величины типа Real она вычисляет величину типа Extended.
Пример.
{$N-}
begin
Р:= Pi {3.1415926536E+00}
end.
{$N-}
begin
Р:= Pi {3.1415926535897932385E+0000}
end.
4.3.2. Функции преобразования типа
Эти функции предназначены для преобразования типов величин, например (им иола в целое число, вещественного числа в целое и т. д. К ним относятся следующие функции:
| Chr (X) - | преобразование ASCII-кода в символ.
Аргумент функции должен быть целого типа в диапазоне (0..255). Результатом является символ, соответствующий данному коду. |
| High(X) - | получение максимального значения величины.
Аргумент функции - параметр или идентификатор порядкового типа, типа-массива (см. п. 6.1), типа-строки (см. п. 6.2) или открытый массив (см. п. 10.3.5). Результат функции для величины порядкового типа - максимальное значение этой величины, типа-массива - максимальное значение индекса, типа-строки -объявленный размер строки, открытого массива - количество компонент массива минус 1 (максимальный индекс, при начале нумерации с нуля). |
| Low(X) - | получение минимального значения величины.
Аргумент функции - параметр или идентификатор порядкового типа, типа-массива (см. п. 6.1), типа-строки (см. п. 6.2) или открытый массив (см. п. 10.3.5). Результат функции для величины порядкового типа - минимальное значение этой величины, типа-массива - минимальное значение индекса, типа-строки или открытого массива - 0. |
| Ord(X) - | преобразование любого порядкового типа в целый тип.
Аргументом функции может быть величина любого порядкового типа (логический, символьный, перечисляемый). Результатом является величина типа Longint. |
| Round (X) - | округление вещественного числа до ближайшего целого.
Аргумент функции - величина вещественного типа, а результат - округленная до ближайшего целого величина типа Longint. Если результат выходит за диапазон значений Longint, то при выполнении программы возникает ошибка. |
| Trunc(X) - | получение целой части вещественного числа.
Аргумент функции - величина вещественного типа, а результат - целая часть этого числа. Тип результата - Longint. Если результат выходит за диапазон значений Longint, то во время выполнения программы возникает ошибка. |
4.3.3. Функции для величин порядкового типа
Эти функции позволяют выполнить ряд действий над величинами порядкового i типа (найти предыдущий или последующий элемент, проверить число на нечетность) . К этим функциям относятся следующие:
| Odd(X) - | проверка величины X на нечетность.
Аргументом функции является величина типа Longint, результат равен True, если аргумент нечетный, и False - если четный. |
| Pred(X) - | определение предыдущего значения величины X.
Аргументом функции является величина любого порядкового типа, результатом - предшествующее значение того же типа (например, Pred(2) равно 1). При применении функции к первому элементу последовательности возникает ошибка. |
| Succ(X) - | определение последующего значения величины X.
Аргументом функции является величина любого порядкового типа, результатом - последующее значение того же типа (например, Succ(2) равно 3). При применении функции к последнему элементу последовательности возникает ошибка. |
В программировании, как и в любой науке (хотя это и искусство также), с течением исторического времени накапливается опыт, методы решения различных задач. Решение многих задач является достаточно универсальным. Незачем каждый раз писать алгоритм для ее решения, если он уже был написан много лет назад и одобрен сообществом программистов. Такие алгоритмы оформляются в виде функций и модулей, а затем используются в программах, которые пишутся здесь и сейчас.
Функция или процедура может быть уже включена в сам язык программирования, а может входить в модуль, который требуется «подключить» к программе.
Ниже описаны стандартные (включенные в язык) функции языка программирования Паскаль.
Арифметические функции
Арифметические функции можно использовать только с величинами целого и вещественного типа.
| Функция | Назначение | Тип результата |
| abs (x) | абсолютное значение аргумента | совпадает с типом аргумента |
| sqr (x) | квадрат аргумента | совпадает с типом аргумента |
| sqrt (x) | квадратный корень аргумента | вещественный |
| cos (x) | косинус аргумента | вещественный |
| sin (x) | синус аргумента | вещественный |
| arctan (x) | арктангенс аргумента | вещественный |
| exp (x) | e x | вещественный |
| ln (x) | натуральный логарифм | вещественный |
| int (x) | целая часть числа | вещественный |
| frac (x) | дробная часть числа | вещественный |
Функции преобразования типов
Эти функции предназначены для преобразования типов величин, например, символа в целое число, вещественного числа в целое и т.д.
В программировании, довольно часто приходиться выполнять однотипные действия, причем в задачах разного уровня и класса. И для ускорения процесса написания кода эти действия выносят в специальные подпрограммы – стандартные функции. Обращение к такой подпрограмме происходит по ее имени, а в скобках указывается значение аргумента. В следующей таблице указаны те стандартные функции, которые используются в языке программирования Pascal.
| Функция | Назначение |
| ABS(x) | Вычисление абсолютного значения x: |х| |
| SQR(x) | Вычисление квадрата x: x*x |
| SIN(x) | Вычисление синуса x: sin x |
| COS(x) | Вычисление косинуса x: cos x |
| ARCTAN(x) | Вычисление арктангенса x: arctg x |
| EXP(x) | Вычисление экспоненты (числа Е) в степени x |
| EXP10(x) | Вычисление 10 в степени x |
| LN(x) | Вычисление натурального логарифма x |
| LOG(x) | Вычисление десятичного логарифма x |
| SQRT(x) | Вычисление квадратного корня из x |
| A DIV B | Вычисление частного при делении А на В с отбрасыванием остатка |
| A MOD B | Нахождение остатка от делении А на В |
| TRUNC(x) | Нахождение целой части x |
| RANDOM(x) | Псевдослучайное число в интервале |
| ROUND(x) | Округление значения x в сторону ближайшего целого |
| ODD(x) | Проверяет аргумент на нечетность. Результат TRUE, если аргумент нечетный, FALSE – если четный. |
| ORD(x) | Возвращает порядковый номер аргумента и, как следствие, преобразует величину порядкового типа в величину целого типа. |
| CHR(x) | Определение символа языка Паскаль по его порядковому номеру |
| SUCC(x) | Нахождение элемента, идущего после данного в перечне допустимых элементов |
| PRED(x) | Нахождение элемента, идущего перед данным в перечне допустимых элементов |
| FRAC(X) | Возвращает дробную часть x |
| INT(X) | Возвращает целую часть x |
| Pi | Значение математической постоянной π |
| EOF(x) | Возвращает TRUE, если файл находится в стоянии “конец файла”, иначе FALSE, если нет конца файла |
Выражения
Выражение состоит из переменных, констант, полей в записях, указателей функций, круглых скобок и знаков операций. Для корректной записи выражений необходимо знать не только как обозначаются те или иные операции, функции и т. п., но также стоит предусмотреть приоритеты их выполнения, математические и логические правила, а также некоторые тонкости самого языка. Для более углубленного изучения выражений, стоит рассмотреть несколько примеров.
1) 12+3*3=21 (12+3)*3=45
Как видите выражения в Pascal , имеют такой же приоритет, как и в математике, а с помощью круглых скобок его можно изменить.
2) (a >1) and (a <=20)
Такое логическое выражение возвращает истину, лишь в том случае, когда истинны оба выражения, т. е. если a входит в диапазон от 1 до 20 включительно. Стоит обратить внимание на скобки, здесь они необходимы для изменения приоритета, так как у операторов сравнения он низший.
3) (a+3>0) and (a+3<15) or (b>1) and (b<10)
Условие вернет истину, тогда когда истинными будут два условия слева или справа от OR , а также если они оба будут истинными.
Логическая операция OR (или) суть дизъюнкция в логики и поэтому имеет следующую таблицу истинности:
| X | Y | X or Y |
| 0 | 0 | 0 |
| 0 | 1 | 1 |
| 1 | 0 | 1 |
| 1 | 1 | 1 |
Ложь имеет место только когда X и Y ложны (нули). В том случае, чтобы истина возвращалась только тогда, когда одно из условий верно следует применить оператор XOR (исключающее или).
Арифметические функции
Арифметические функции можно использовать только с величинами целого и вещественного типа.
|
Функция |
Назначение |
Тип результата |
|
abs (x) |
абсолютное значение аргумента |
совпадает с типом аргумента |
|
sqr (x) |
квадрат аргумента |
совпадает с типом аргумента |
|
sqrt (x) |
квадратный корень аргумента |
вещественный |
|
cos (x) |
косинус аргумента |
вещественный |
|
sin (x) |
синус аргумента |
вещественный |
|
arctan (x) |
арктангенс аргумента |
вещественный |
|
exp (x) |
вещественный |
|
|
натуральный логарифм |
вещественный |
|
|
int (x) |
целая часть числа |
вещественный |
|
frac (x) |
дробная часть числа |
вещественный |
Функции преобразования типов
Эти функции предназначены для преобразования типов величин, например, символа в целое число, вещественного числа в целое и т.д.
Функции для величин порядкового типа
8 Оператор присваивания
Данный оператор предписывает запомнить некоторое значение в переменой. Значение и идентификатор переменой разделены парой знаков := . Типы объектов с обеих сторон знака := должны строго совпадать, за исключением того случая, когда тип переменой - REAL, а тип выражения - INTEGER. Общий вид оператора: < переменная >:= < выражение >
Операторы ввода/вывода
Немногие программы обходятся без ввода данных и совсем нет таких, которые не выводят полученные результаты.
Ввод данных с клавиатуры выполняется операторами: READ и READLN. Формат: Read (список переменных);
Readln (список переменных);
Буквы ln добавляются в конце оператора для того, чтобы курсор автоматически переходил на следующую строку при выводе на экран текстов или результатов выполнения программы. Например:
Readln (x, y, z); Read (beta, gamma);
При выполнении оператора READ(READLN) программа останавливается и ждет, пока нужное количество чисел не будет введено с клавиатуры
Вывод данных на экран дисплея выполняется операторами: WRITE и WRITELN. Формат:
Write (список выражений); Writeln (список выражений);
Выражение в списке разделяются запятыми. Значения выражений сначала вычисляются, а затем выводятся на экран. При выводе вещественных значений можно указать, сколько десятичных цифр следует сохранить в дробной части числа, причем количество цифр указывается вслед за шириной поля после двоеточия.
Для того чтобы прокомментировать выводимые значения, в список вывода можно помещать строки любых символов, заключенные в апострофы.
9. Условный оператор if . Общий вид if <условие> then<действие 1>; else <действие 2>;
Оператор if может быть использован и без второй части
Если необходимо выполнить несколько условий, то тогда используем такие виды записи (условие 1) and (условие 2)- в этом случае должно выполнятся и 1 и 2
(условие 1) or (условие 2) – в этом случае выполняется выбор.Скобки обязательны!
Стандартными функциями языка программирования Pascal приведены в табл. 1
Таблица 1:
| Имя функции | Выполняемая операция | |
| ABS(X) | Вычисляет модуль аргумента х, тип х – вещественный или целый, тип результата совпадает с типом аргумента | |
| SQR(X) | Вычисляет квадрат аргумента (х 2), тип х – вещественный или целый, результат совпадает с типом аргумента | |
| SQRT(X) | Вычисляет корень квадратный из аргумента х (х>0); тип х – вещественный или целый, тип результата вещественный | |
| SIN(X) | Вычисляет синус аргумента х (х – в радианах); тип х – вещественный или целый, тип результата вещественный | |
| COS(X) | Вычисляет косинус аргумента х (х – в радианах); тип х – вещественный или целый, тип результата вещественный | |
| ARCTG(X) | Вычисляет арктангенс аргумента х (х – в радианах); тип х – вещественный или целый, тип результата вещественный | |
| EXP(X) | Возведение числа е=2,71828 в степень х (е х), тип х – вещественный или целый, тип результата вещественный |
Эти функции содержатся в памяти среды программирования Pascal и являются подпрограммами вычисления наиболее используемых функций итерационными методами.
Примеры составления линейной программы
Пример 1 Найти среднее арифметическое трёх чисел - двух целых (X и Y) и одного вещественного (Z) и квадрат среднего арифметического.
Программа :
Program Midding;
X, Y: Integer;
Z, Midd, SqrMidd: Real;
WriteLn("Введите два целых числа X и Y:");
ReadLn(X,Y);
WriteLn("Введите вещественное число Z:");
ReadLn(Z);
Midd:=(X+Y+Z)/3;
SqrMidd:=SQR(Midd)
Writeln("Среднее арифметическое = ",Midd);
Write("Квадрат среднего арифметического = ",SqrMidd);
Описание программы
В заголовке указано имя программы - Midding (среднее), затем словом var открывается раздел описания переменных: X и Y – целые, Z – вещественная. Слово begin открывает основной блок программы, в котором:
▪ оператор WriteLn выводит на экран текст "Введите два целых числа X и Y:";
▪ оператор ReadLn(X,Y)считывает значения чисел, введённых с клавиатуры и присваивает их соответственно целым переменным X и Y;
оператор ReadLn(Z)считывает значение числа, введённого с клавиатуры и присваивает его вещественной переменной Z;
▪ затем оператор присваивания вычисляет среднее значение X,Y,Z и присваивает его переменной Midd, затем аналогично вычисляется квадрат этой величины и присваивается переменной SqrMidd;
▪ оператор Writeln выводит текст "Среднее арифметическое = ",
рассчитанное значение Midd и переводит курсор на новую строку;
▪ оператор Write выводит текст "Квадрат среднего арифметического = " и рассчитанное значение SqrMidd;
▪ оператор end. закрывает основной блок и завершает выполнение программы.
Пример 2 Вычислить площадь круга S и длину окружности L по заданному радиусу R.
Программа
Program KRUG;
const P=3.14159
R,S,L:Real;
Read(R);{ввод значения радиуса}
L:=2*P*R;
S:=P*SQR(R);
Writeln(Длина окружности = ",L,"см");
Write("Площадь круга = ",S,"кв.см");
Контрольные вопросы
1 Из каких разделов состоит любая программа на языке Pascal?
2 Формат и назначение оператора присваивания.
3 Формат и назначение операторов ввода данных.
4 Формат и назначение операторов вывода данных.
Задание
| Найти площадь поверхности куба по формуле T=6a 2 | |
| Определить расстояние, пройденное физическим телом за время t, если тело движется с постоянной скоростью v. | |
Вычислить:  |
|
| В году примерно 3.156х10 7 сек. Написать программу, которая запрашивает возраст в годах и переводит его в секунды. | |
| Вычислить: | |
| Найти объем цилиндра по формуле: V=pR 2 H | |
| Найти расстояние от точки с координатами (x,y) до начала координат. | |
| Масса m одной молекулы воды примерно равна 3.0х10 -23 гр. Кварта воды равна примерно 950 гр. Написать программу, которая запрашивает количество воды в квартах и выводит число молекул в этом количестве воды. | |
| Найти объем куба по формуле V=a 3 . (с использованием и без использования стандартных функций). | |
| Вычислить: | |
| Написать программу, которая запрашивает количество дней и переводит в недели и дни. Например, 18 дней = 2 недели и 4 дня. | |
| Найти диагональ и площадь квадрата | |
Вычислить:  |
|
| Найти площадь боковой поверхности шара: T=4pR 2 | |
| Вычислить: | |
Вычислить:  |