Программирование на языке Паскаль презентация

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

Теория. М.Е.Фиошин, § 13 (стр. 190 – 198)

Подпрограммы. Общие сведения.

некоторых действий.
Применение:
выполнение одинаковых действий в разных местах программы
разбивка программы (или другой процедуры) на подзадачи для лучшего восприятия

быть много процедур
чтобы процедура заработала, нужно вызвать её по имени из основной программы или из другой процедуры

n < 0 then Error;
...
end.

procedure Error;
begin
writeln('Ошибка программы')
end;

вызов процедуры

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

procedure Tr( x, y, r, g, b: integer);

Tr (200, 100, 0, 255, 0);

x

y

r

g

b

стоят рядом, их перечисляют через запятую
внутри процедуры параметры используются так же, как и переменные

procedure A (x: real; y: integer; z: real);

procedure A (x, z: real; y, k, l: integer);

к ним доступа

program qq;
procedure A(x, y: integer);
var a, b: real;
begin
a := (x + y)/6;
...
end;
begin
...
end.

procedure A(x, y: integer);
var a, b: real;
begin
a := (x + y)/6;
...
end;

локальные переменные

var a, b: real;

integer);
Var
i: Integer;
Begin
k:=1;
Writeln (' Введите степень');
Read(x);
For i:=1 TO x DO
k:= k*n
End;
Begin
Writeln('Введите число’);
Readln(n);
STEPEN (n,x,k);
Writeln ('k=', K);
End.

Пример: Возвести число в N-ю степень.

Поиск Max элемента массивов а, b и их номера

Пример работы программы

они обозначаются именами и могут меняться
при вызове процедуры в скобках указывают фактические параметры (через запятую или арифметические выражения) в том же порядке

Procedure STEPEN (n: Integer; x: real; Var k: real);

STEPEN (x, n, k);

(n, x, k);

x

n

k

2, 3 ); { числа }
Exchange ( x+z, y+2 ); { выражения }

procedure Exchange ( a, b: integer );
var c: integer;
begin
c := a; a := b; b := c;
end;

var

параметры могут изменяться

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

Параметры-переменные

возрастания.
Пример:
Введите три натуральных числа:
10 15 5
5 10 15
«B»: Напишите процедуру, которая сокращает дробь вида M/N. Числитель и знаменатель дроби передаются как изменяемые параметры.
Пример:
Введите числитель и знаменатель дроби:
25 15
После сокращения: 5/3