Презентация, доклад по информатике на тему:Подпрограммы и функции

- программы;
Label метки ;
Const описание констант ;
type
определения типов данных ;
var
описание переменных ;
procedure и functions ;
begin
основное тело программы
end.

производить одни и те же вычисления, но при различных исходных данных. Чтобы исключить повторение одинаковых записей и сделать тем самым программу проще и понятнее, можно выделить эти повторяющиеся вычисления в самостоятельную часть программы, которая может быть использована многократно по мере необходимости.

Использование подпрограмм позволяет применять один из самых прогрессивных принципов программирования – структурное программирование.
Автономная часть программы, реализующая определённый алгоритм, и допускающая обращение к ней из различных частей программы, называется подпрограммой.

и выход.
Имена переменных в основной программе и в подпрограммах независимы друг от друга.
В языке Паскаль выделяют два вида подпрограмм: процедуры (PROCEDURE) и функции (FUNCTION).
Любая программа может содержать несколько процедур и функций и в свою очередь процедуры могут содержать встроенные процедуры.
Процедуры и функции объявляются в разделе описания вслед за разделом переменных.

и операторов.
PROCEDURE имя ( формальные параметры);
раздел описаний
BEGIN

раздел операторов
END;
Допускается использование процедур без параметров. Раздел описания процедуры состоит из тех же разделов, что и раздел описаний обычной программы.

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

разделе операторов основной программы и в любой подпрограмме. Эти имена называются глобальными.
Имена, объявленные в подпрограмме, действуют только в этой подпрограмме и называются локальными.
Формальные параметры представляют собой список переменных с указанием их типов. Для выделения выходных параметров перед ними ставится служебное слово VAR.

программы в процедуру

Выходные параметры, передаются из процедуры в основную программу

Формальные параметры

которые передаются в процедуру могут быть:
переменными;
константами;
выражениями;

Параметры, которые получают значения из процедуры, могут быть переменными.

следующим образом:
sum (6, 8, Z);
Это означает, что А:=6, В:=8, Z:=С.

Procedure Sum(a,b:integer; Var c:integer);
Begin
C:=a+b;
End;

быть соответствие
по количеству параметров,
порядку их следования,
по типу данных.
Имена соответствующих формальных и фактических параметров могут быть одинаковыми и различными.

порядке возрастания, т.е. так, чтобы a

program pr_1;
var a,b,c:integer;
procedure Swap(var x,y:integer);
var t:integer;
begin
t:=x; x:=y; y:=t;
end;
begin
writeln('vvedite 3 chisla');
readln(a,b,c);
if a>b then swap(a,b);
if b>c then swap(b,c);
if a>c then swap(a,c);
if a>b then swap(a,b);
Writeln(a,' ',b,' ',c);
readln;
end.

+a3 × x3 +a2×x2 +a1×x1 +a0.
Найти периметр треугольника, заданного координатами своих вершин (Процедура для определения длины отрезка)
Даны вещественные числа a,b,c,d,e,f,g. Найти площадь пятиугольника. Определить функцию для расчёта площади треугольника по трём сторонам.

zap;
const n=100; t=20;
var a:array[1..t] of integer;
procedure init(t,n:integer;var a:array of integer);
var i:integer;
begin
randomize;
for i:=1 to t do begin
a[i]:=random(n);
write (a[i],' '); end;writeln; end;
begin
init(t,n,a);
end.

целых чисел разной размерности. Найти среднее арифметическое элементов каждого массива и их сумму. Решить задачу для 3 массивов.
2. Даны два одномерных массива целых чисел одинаковой размерности. Подсчитать количество и сумму отрицательных элементов. Решить задачу для 3 массивов.
3. Даны три одномерных массива целых чисел одинаковой размерности. Сформировать 4-ый массив, каждый элемент которого равен максимальному элементу из трёх массивов.

оформляется в следующем виде:
FUNCTION имя (формальные параметры): тип;
раздел описания
BEGIN
раздел операторов
END;

Вызывается функция по её имени с указанием фактических параметров. При этом вызов функции можно делать непосредственно внутри выражения.

произведение n чисел натурального ряда: 1*2*3*...n.
FUNCTION FACT (N : integer): longint;
var i: integer;
p: longint;
BEGIN
P:=1;
For I:=1 To n Do P:=P*I;
FACT:=P
END;
Вызывается функция по своему имени FACT c указанием фактических параметров М и К:
F:=FACT(M)-FACT(K);

Имя функции

Формальный параметр

иметь список параметров , следующих за именем функции в круглых скобках, но при описании функции указывается тип результата функции.
2. Имя процедуры используется только для её вызова, а с именем функции связывается её значение.
3. Процедура и функция отличаются и по способу вызова. Процедура вызывается своим именем с указанием фактических параметров, а функция вызывается в виде оператора присваивания, и может быть в списках оператора Write bk Writeln.(“Разность факториалов”, FACT(m)-FACT(k));
4. Функция должна иметь в теле команду присваивания с именем переменной , имя которой совпадает с именем функции.