Процедуры
Структура процедуры Procedure (формальные параметры : их тип); Var (локальные переменные) begin... end; Процедура вызывается по имени: (фактические параметры); Значение каждого фактического параметра при вызове процедуры передаётся формальному параметру. Временно управление передаётся процедуре. После завершения работы процедуры управление возвращается в основную программу.
Формальные и фактические параметры Каждый формальный параметр указывается вместе со своим типом. Соответствующий ему фактический параметр указывается без типа. Между формальными и фактическими параметрами должно быть соответствие по количеству параметров, по их типу и порядку следования. Заголовок процедуры может выглядеть так: PROCEDURE GG(a,b,c:integer); вызываться так: GG(3,n,m) Здесь a,b,c-формальные параметры, а 3, n, m-фактические параметры Таким образом в процедуру передаются значения: a=3, b=n, c=m
Пример процедуры и её вызова Procedure express(a,b,c : real; var x,y:real); Var z : real; begin z:=a+ b+ c; x:=sqr(z); y:=sqrt(z); end ; Эту процедуру можно вызвать следующим образом: express(7.6, 6.8, 9.5, x1, x2); Формальные входные параметры a, b, c принимают значения соответствующих фактических параметров a=7.6; b=6.8; c=9.5.
Примеры решения серьёзных задач Откройте в Turbo Pascal задачи big.pas и small.pas. Объясните, как они работают.
Решение задач Написать программу подсчета суммы М введенных с клавиатуры чисел. Составить программу поиска большего из трёх чисел, с использованием процедуры поиска большего из двух чисел. Напишите программу (процедуру), которая будет возвращать значение среднего арифметического двух своих параметров а и b. Написать процедуру, меняющую значения двух переменных а и b местами
Решение задач Используя процедуру обмена значений двух переменных, упорядочьте по возрастанию переменные a, b, c. Определить длину окружности L и площадь круга S. Радиус окружности задается с клавиатуры. Вычисление S и L оформить в виде процедуры. Постройте диалоговой алгоритм, позволяющий выводить несколько графиков по выбору в одной системе координат. Для построения графиков используйте подпрограммы. Напишите подпрограмму, которая будет вычислять сумму правильных делителей заданного числа n. Правильными делителями числа n, являются все делители этого числа, за исключением его самого.