Стандартные функции Pascal

В программировании, как и в любой другой науке со временем накапливается опыт и способы решения разных задач становятся все более совершенными. При этом решения многих задач – универсальные.

Поэтому нет никакого смысла писать один и тот же алгоритм для их решения, если он уже давно известен и написан программистами. Подобные алгоритмы представлены в виде модулей и функций, а затем применяются в программах, которые пишутся в настоящее время.

Процедура или функция уже может входить в язык программирования или в модуль, который нужно «подключить» к программе. Дальше приведем стандартные функции языка программирования Pascal.

Стандартные функции Pascal

Основные или арифметические функции

ФункцияНазначениеТип результата
abs (x)абсолютное значение аргументасовпадает с типом аргумента
sqr (x)квадрат аргументасовпадает с типом аргумента
sqrt (x)квадратный корень аргументавещественный
cos (x)косинус аргументавещественный
sin (x)синус аргументавещественный
arctan (x)арктангенс аргументавещественный
exp (x)exвещественный
ln (x)натуральный логарифмвещественный
int (x)целая часть числавещественный
frac (x)дробная часть числавещественный

Функции преобразования типов 

round (x)— округляет вещественное число до ближайшего целого.
trunc (x)— выдает целую часть вещественного числа, отбрасывая дробную.

Пользовательские функции Pascal

Функция в Pascal – это подпрограмма, которая всегда возвращает определенное значение (в отличие от процедуры). Поэтому в теле функции ее имени присваивается результат (вычислительное значение), который она возвращает.

Другими словами, функция представляет собой подпрограмму, результатом работы которой выступает определенное значение.

Функции применяют для:

  • проведения одинаковых расчетов в разных местах программы;
  • для создания общедоступных библиотек функций.

Синтаксис:

  • заголовок начинается служебным словом function Стандартные функции Pascal
  • описание формальных параметров (тех, значения которых передаются из программы в функцию): Стандартные функции Pascal
  • параметры-переменные — параметры, значения которых будут доступны и в основной программе (они возвращаются в программу) Стандартные функции Pascal
  • тип возвращаемого функцией результата через двоеточие описывается в конце заголовка функции: Стандартные функции Pascal
  • Функция вызывается в теле основной программы, только если ее имя есть в каком-либо выражении (процедура же вызывается отдельно).
  • Внутри функции можно объявлять и применять локальные переменные: Стандартные функции Pascal

    Правила использования функций в Pascal:

  • чтобы воспользоваться функцией, необходимо указать ее в правой части оператора присваивания;
  • при обращении к функции нужно указать ее аргументы в круглых скобках;
  • в разделе описания переменных важно правильно указывать типы переменных, которые планируете употребить в качестве результата или агрумента функции;
  • в одном выражении доступно обращение к нескольким функциям.

Правила применения процедур:

  • для выполнения процедуры ее необходимо вызвать в программе в качестве оператора;
  • в разделе описания переменных правильно указывайте тип переменной, которую планируете употребить, как аргумент процедуры.

Задача. Найдите значения выражений:

a) (1+x)2
b) Стандартные функции Pascal
c) |a+ bx|

Перед тем как приступить к составлению программы, нужно перевести данные выражения с математического языка на Pascal.

a) (1+x)2 → sqr(1+x)
b) Стандартные функции Pascal → sqrt((1+A)*5)
c) |A+ bx| → abs(A+b*x)

Теперь можно переходить к составлению самой программы.

Program Primer;
Uses
Crt;
Var
A : word; {так как подкоренное выражение должно быть положительно}
b, x, result : real;
Begin
ClrScr;
Writeln(‘Введите значения переменных (A-положительно)’);
Write(‘A=’);
Readln(A);
Write(‘b=’);
Readln(b);
Write(‘x=’);
Readln(x);
Result := sqr(1+x);
Writeln (‘sqr(1+x)=’, result);
Result := sqrt((1+A)*5);
Writeln (‘sqrt((1+A)*5)=’, result);
Result := abs(A+b*x);
Writeln (‘abs(A+b*x)=’, result);
Readln;
End.

Задание. Наберите программу, протестируйте ее работоспособность, добавьте комментарий, сохраните файл, после чего распечатайте листинг.

Любые вопросы по материалу можете задать в комментариях. Возникли ли у вас какие-то сложности?

Образовательный портал 3TY.RU
Adblock
detector