Процедуры и функции в Паскаль
17 февраля 2019 - Администратор
Комментарии (0)
Нет комментариев. Ваш будет первым!
В этом уроке мы научимся создавать и использовать процедуры и функции в Паскаль.В программировании и при решении задач ОГЭ и ЕГЭ на 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.
Поделиться:
Нет комментариев. Ваш будет первым!