Процедуры и функции в Паскаль

17 февраля 2019 - Администратор

Процедуры и функции в Паскаль

В этом уроке мы научимся создавать и использовать процедуры и функции в Паскаль.В программировании и при решении задач ОГЭ и ЕГЭ на Pascal часто необходимо выполнять одни и те же действия несколько раз, для этого в Паскаль используются процедуры. Процедуры помогают структурировать программу и делать её более читаемой.
Для  задания процедуры в паскаль  следует написать ключевое слово procedure, ввести через пробел название процедуре, в скобках задать название аргументов и их тип, после чего использовать конструкцию begin end и в ней задавать команды, которые исполняет процедура. В процедуре можно ввести локальные переменные сразу после begin.
procedure названиеПроцедуры(переменные: типДанных; переменные: типДанных;...);
begin
var локальныеПеременные: типДанных;
...
end;

Локальные переменные используются только внутри процедуры.
Пример процедуры на Паскаль, решающей линейное уравнение вида ax + b = 0 и выводящей решение на экран. Если a = 0 и b = 0, то x может принимать любое значение, решений будет бесконечное количество. Если a = 0 и b ≠ 0, то решений нет, т.к. при любом x член ax будет равен нулю и не может быть равен b. Если a ≠ 0, то единственным решением линейного уравнения будет x = -b/a.
// процедура решения линейного уравнения
procedure linear(a, b: real);
begin
var sol: real;
If (a = 0) and (b = 0) then
begin
writeln('Бесконечное количество решений.');
end;
If (a = 0) and (b <> 0) then
begin
writeln('Нет решений.');
end;
If (a <> 0) then
begin
sol := -b/a;
writeln(sol);
end;
end;
begin
linear(1, 1);
end.

Чтобы вызвать процедуру на Pascal в основной программе, нужно написать название процедуры и задать значения  всех аргументов в скобках.
begin
linear(1, 1);
end.

Функции в Паскаль 

В отличие от процедур функции в Паскаль возвращают значение. Чтобы задать функцию в программе Паскаль, нужно  указать ключевое  слово function имя и тип функции.
Общая структура  функции в Паскаль
function  имя функции(аргументы функции): тип возвращаемого значения;
begin
Команды функции
имя функции:=возвращаемое значение;
end;

Пример функции  на Pascal для поиска среднего арифметического между двумя числами a и b. Задаются два вещественных числа типа данных real, внутри вводится локальная переменная med, в которую мы запишем среднее арифметическое двух чисел a и b.  В конце функции мы возвращаем  
//функция  поиска среднего арифметического двух чисел
function medium(a, b: real):real;
begin
// объявляем локальную переменную
var med: real;
// записываем в переменную среднее арифметическое
med := (a + b)/2;
medium:=med;
end;
// вызываем в основной программе функцию
begin
write(medium(2,8));
end.

Вернуться к содержанию

Поделиться:

 
Комментарии (0)

Нет комментариев. Ваш будет первым!