Презентация, доклад к уроку Функции: способы организации и описание. Вызов функций

программист

процедура

функция

Тема урока:
Функции: способы организации и описание. Вызов функций

Цели урока:

сформировать знания и умения по данной теме;

научиться применять подпрограммы-функции в решении задач на языке Паскаль.

Вопросы:

1. Что такое подпрограмма?

Подпрограмма – это специальным образом оформленный алгоритм, который может многократно использоваться при решении более общей задачи

2. Какие задачи решают подпрограммы?

Избавляют от необходимости многократно повторять в тексте программы аналогичные фрагменты;
Улучшают структуру программы, облегчая ее понимание;
Повышают устойчивость к ошибкам программирования и непредвиденным последствиям при модификациях программы

3. Где в программе описывается подпрограмма?

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

4. Назовите виды подпрограмм

процедуры и функции

5. Как описываются процедуры на языке Паскаль?

Procedure Имя (формальные параметры);
описание переменных; begin
инструкции;
end;

6. Какие параметры называются "формальные" и какие - "фактические"?

Фактические параметры - находятся в главной программе и указываются при вызове подпрограммы;

формальные параметры – находятся в подпрограмме и указываются при ее описании

7. Как выполнить вызов процедуры в программе?

Имя (фактические параметры);

8. Какие переменные называются глобальными, а какие локальными переменными?

Глобальные переменные - это переменные, описанные в основной программе;

Локальные переменные- это переменные, описанные в подпрограмме

Иннокентий Смоктуновский

Андрей Панин

процедура или функция?

__________ MaxNum(a,b:integer):integer;
var
max: integer;
begin
if a>b then max:=a else max:=b;
MaxNum:=max;
end;

процедура или функция?

________ MaxNum(a,b:integer; var
max:integer);
begin
if a>b then max:=a else max:=b;
end;

процедура или функция?

________Add(x,y: integer):integer;
begin
Add:=x+y;
end;

Решение задач

Задача 1. Написать программу нахождения суммы максимального и минимального элемента целочисленного массива, используя подпрограмму-функцию нахождения максимального и минимального элемента.

…
type
tArr=array[1..100] of integer;
var
MasA:tArr;
i,n:byte;
sum:integer;

function MaxEl(Mas:tArr;n:byte):integer;

function MaxEl(Mas:tArr;n:byte):integer;
var m:integer;
begin
m:=Mas[1];
for i:=2 to n do
if m MaxEl:=m;
end;

function MinEl(Mas:tArr;n:byte):integer;
var m:integer;
begin
m:=Mas[1];
for i:=2 to n do
if m>Mas[i] then m:=Mas[i];
MinEl:=m;
end;

Begin randomize;
writeln('Vvedite n'); readln(n);
for i:=1 to n do MasA[i]:=random(10)-3;
sum:=MaxEl(MasA,n)+MinEl(MasA,n);
writeln('Elementi massiva: ');
for i:=1 to n do write(MasA[i],' ');
writeln; writeln('Summa = ',sum);
readln; end.

Анализ программы

Назовите глобальные и локальные переменные.
Назовите фактические и формальные параметры.
Как в основной программе осуществляется обращение к подпрограмме?

Задача 2. Найти наибольшее число из 4 заданных чисел.

var a,b,c,d,n:integer;
function MaxNum(x,y:integer):integer;
var max:integer;
begin
if x>y then max:=x else max:=y;
MaxNum:=max;
end;
begin
writeln('Vvedite a,b,c,d'); readln(a,b,c,d);
n:=MaxNum(MaxNum(a,b),MaxNum(c,d));
writeln('Maksimalnoe chislo = ',n);
readln;
end.

Задача 3. Составить программу вычисления площади кольца по значениям внутреннего и внешнего радиусов, используя подпрограмму вычисления площади круга.

program Project1;
{$APPTYPE CONSOLE}
uses SysUtils;
var R1,R2,Pl:real;
function Pl_kr(r:real):real;
begin
Pl_kr:=3.14*sqr(r);
end;
begin
writeln('Vvedite vneshniy radius'); readln(R1);
writeln('Vvedite vnutrenniy radius'); readln(R2);
Pl:=Pl_kr(R1)-Pl_kr(R2);
writeln('Ploschad koltsa = ',Pl:6:2);
readln;
end.

Рефлексия

Что такое подпрограмма-функция в Pascal?
Где объявляется в основной программе подпрограмма-функция?
Как объявляется подпрограмма-функция?
Как вызывается в основной программе подпрограмма- функция?

Завершите фразу:

Сегодня я узнал(а)…
Было интересно…
Было трудно…
Я понял(а), что…
Теперь я могу…
Я почувствовал(а), что…
Я приобрел(а)…
Я научился(ась)…
У меня получилось …
Я смог(ла)…
Меня удивило…
Мне захотелось…

Домашнее задание

1) Выучить тему сегодняшнего урока.
2) Выполнить задачу. По координатам вершин треугольника вычислить его периметр и площадь, используя подпрограмму-функцию вычисления длины отрезка, соединяющего две точки.