Процедуры «PROCEDURE»

Ноябрь 30, 2009 / Автор AlexR / Рубрики Учебник по паскалю / Комментировать

Краткие теоретические сведения находятся в пункте «Модульное программирование»

Описание процедуры:

Procedure <имя> [(формальные параметры: тип);…)];

<Блок описания переменных процедуры>;

Begin

<Блок операторов>;

End;

Описываются процедуры до начала основной программы.

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

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

Пример: Посчитать факториал числа.

program factorial;
var n:integer;

procedure fct (a:integer);
var i:byte;
    P:integer;
begin
  P:=1;
  for i:=1 to a do P:=P*i;
  write (n,'!=',P)
end;

begin
  write ('Введите n:');
  readln (n);
  fct(n);
end.

Данный пример демонстрирует работу процедуры. На самом деле для того, чтобы посчитать факториал (или какую-нибудь сумму) один раз, не надо создавать процедуру. Посчитать это можно в основной программе.

Вернуться к оглавлению

Комментарии закрыты.