Слайд 4Тема урока:
Функции: способы организации и описание. Вызов функций
Слайд 5Цели урока:
сформировать знания и умения по данной теме;
научиться применять подпрограммы-функции
в решении задач на языке Паскаль.
Слайд 6Вопросы:
1. Что такое подпрограмма?
Подпрограмма – это специальным образом оформленный алгоритм, который
может многократно использоваться при решении более общей задачи
Слайд 72. Какие задачи решают подпрограммы?
Избавляют от необходимости многократно повторять в тексте
программы аналогичные фрагменты;
Улучшают структуру программы, облегчая ее понимание;
Повышают устойчивость к ошибкам программирования и непредвиденным последствиям при модификациях программы
Слайд 83. Где в программе описывается подпрограмма?
Описание подпрограммы располагается между разделом Var
главной программы и ее программным блоком (первым begin).
Подпрограмм может быть несколько, их описания располагаются в произвольном порядке одно за другим.
Слайд 94. Назовите виды подпрограмм
процедуры и функции
Слайд 105. Как описываются процедуры на языке Паскаль?
Procedure Имя (формальные параметры);
описание переменных; begin
инструкции;
end;
Слайд 116. Какие параметры называются "формальные" и какие - "фактические"?
Фактические параметры -
находятся в главной программе и указываются при вызове подпрограммы;
формальные параметры – находятся в подпрограмме и указываются при ее описании
Слайд 127. Как выполнить вызов процедуры в программе?
Имя (фактические параметры);
Слайд 138. Какие переменные называются глобальными, а какие локальными переменными?
Глобальные переменные -
это переменные, описанные в основной программе;
Локальные переменные- это переменные, описанные в подпрограмме
Слайд 14Иннокентий Смоктуновский
Андрей Панин
Слайд 15процедура или функция?
__________ MaxNum(a,b:integer):integer;
var
max: integer;
begin
if a>b
then max:=a else max:=b;
MaxNum:=max;
end;
Слайд 16процедура или функция?
________ MaxNum(a,b:integer; var
max:integer);
begin
if a>b then max:=a else max:=b;
end;
Слайд 17процедура или функция?
________Add(x,y: integer):integer;
begin
Add:=x+y;
end;
Слайд 18Решение задач
Задача 1. Написать программу нахождения суммы максимального и минимального элемента
целочисленного массива, используя подпрограмму-функцию нахождения максимального и минимального элемента.
Слайд 19…
type
tArr=array[1..100] of integer;
var
MasA:tArr;
i,n:byte;
sum:integer;
function MaxEl(Mas:tArr;n:byte):integer;
Слайд 20function MaxEl(Mas:tArr;n:byte):integer;
var m:integer;
begin
m:=Mas[1];
for i:=2 to n do
if m MaxEl:=m;
end;
Слайд 21 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;
Слайд 22Begin 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.
Слайд 23Анализ программы
Назовите глобальные и локальные переменные.
Назовите фактические и формальные параметры.
Как в
основной программе осуществляется обращение к подпрограмме?
Слайд 24Задача 2. Найти наибольшее число из 4 заданных чисел.
Слайд 25var 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.
Слайд 26Задача 3. Составить программу вычисления площади кольца по значениям внутреннего и
внешнего радиусов, используя подпрограмму вычисления площади круга.
Слайд 27program 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.
Слайд 28Рефлексия
Что такое подпрограмма-функция в Pascal?
Где объявляется в основной программе подпрограмма-функция?
Как объявляется подпрограмма-функция?
Как
вызывается в основной программе подпрограмма- функция?
Слайд 29Завершите фразу:
Сегодня я узнал(а)…
Было интересно…
Было трудно…
Я понял(а), что…
Теперь я могу…
Я почувствовал(а),
что…
Я приобрел(а)…
Я научился(ась)…
У меня получилось …
Я смог(ла)…
Меня удивило…
Мне захотелось…
Слайд 30Домашнее задание
1) Выучить тему сегодняшнего урока.
2) Выполнить задачу. По координатам
вершин треугольника вычислить его периметр и площадь, используя подпрограмму-функцию вычисления длины отрезка, соединяющего две точки.