Что такое findslide.org?

FindSlide.org - это сайт презентаций, докладов, шаблонов в формате PowerPoint.


Для правообладателей

Обратная связь

Email: Нажмите что бы посмотреть 

Яндекс.Метрика

Презентация на тему к уроку Функции в ЯП Pascal (9 класс)

Содержание

? - закон, по которому каждому значению переменной величины (аргумента) ставится в соответствие некоторая определенная величина. ? - обязанность, круг деятельности. ? - работа производимая органом, организмом ? - роль, значение чего-нибудь ?
Презентацию составил:Учитель информатикиБелкин Алексей АлексеевичУчастник конкурса «Учитель года-2018»Сайт:http://belkin.edushd.ru/ ? - закон, по которому каждому значению    переменной величины Функции function имя функции (формальные параметры):тип результата; раздел описаний функции begin  исполняемая Количество фактических параметров должно совпадать с количеством формальных;Соответствующие фактические и формальные параметры Функция имеет только один результат  выполнения (но может иметь несколько входных uses crt;var a:real;function PloshadKvadr(a:char):real; begin PloshadKvadr:=a*a; end;begin readln(a); writeln(PloshadKvadr(a));end.(a:real):real;Соответствующие фактические и формальные var a,b:integer;function PloshadTrapecii(a,b:integer):real; var h:real; begin readln(h); PloshadTrapecii:=((a+b)/2)*h; end;begin readln(a,b); writeln(PloshadTrapecii(a,b));end.Ошибок нет ☺ uses crt;var a:integer;function PloshadKvadr(a:integer):integer; begin PloshadKvadr:=a*a; end;begin readln(a); writeln(PloshadKvadr(a,a));end.Количество фактических параметров должно совпадать с количеством формальных(PloshadKvadr(a)); var a,b,c:integer;function step2(a:integer):integer; begin  step2:=a*a; end;function Diskriminant(b,a,c:integer):real; var d:integer; begin d:=step2(b)-4*a*c; Составить программу вычисления выражения:N!+M!=? uses crt;war n,m:integer; otvet:integer;function fact (a:real) :integer; var i,f:integer; Begin  f:=1; Практическая работаКаждые 3 минуты смена рабочего места Практическая работаp=12S=32P=24 Даны координаты точек треугольника. Найти его периметр.  P=A+B+CПрактическая работа=12.78 uses crt;varxA,yA,xB,yB,xC,yC,AB,AC,BC,P:real;function storona(x1,y1,x2,y2:real):real;begin storona:=sqrt(sqr(x2-x1)+sqr(y2-y1));end;BEGINwriteln('Введите координаты точки A(x,y)');readln(xA,yA);writeln('Введите координаты точки B(x,y)');readln(xB,yB);writeln('Введите координаты точки C(x,y)');readln(xC,yC);AB:=storona(xA,yA,xB,yB);AC:=storona(xA,yA,xC,yC);BC:=storona(xB,yB,xC,yC);P:=AB+AC+BC;writeln(‘Периметр P=',P:2:2);END.  Практическая работаY(1)=-0,263 ShdIKT Спасибо за урок!
Слайды презентации

Слайд 2 ? - закон, по которому каждому значению

? - закон, по которому каждому значению  переменной величины (аргумента)

переменной величины (аргумента) ставится в соответствие некоторая

определенная величина.
? - обязанность, круг деятельности.
? - работа производимая органом, организмом
? - роль, значение чего-нибудь
? - явление, зависящее от другого и изменяющегося по мере изменения этого другого явления.

О каком термине идет речь?

Функция


Слайд 3

Функции

Функции

Слайд 4 function имя функции (формальные параметры):тип результата;

раздел описаний

function имя функции (формальные параметры):тип результата; раздел описаний функции begin исполняемая

функции

begin
исполняемая часть функции
end;
Формат описания функции
function

namefunc(A,B:integer):integer;

var
c,d:integer;

begin
c:=a*a;
d:=b*b;
namefunc:=c+d;
end;

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

Вызов функции

Var
N,M:integer;

Begin
readln(n,m);
writeln(namefunc(n,m));
End.










Слайд 5 Количество фактических параметров должно совпадать с количеством формальных;


Соответствующие

Количество фактических параметров должно совпадать с количеством формальных;Соответствующие фактические и формальные

фактические и формальные параметры должны совпадать по порядку следования

и по типу.


Правила при вызове и
описании функций:


Слайд 6 Функция имеет только один результат выполнения (но

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

может иметь несколько входных параметров);



Имена формальных и фактических параметров

могут совпадать.


Правила при вызове и
описании функций:


Слайд 7 uses crt;
var
a:real;

function PloshadKvadr(a:char):real;
begin
PloshadKvadr:=a*a;
end;

begin
readln(a);

uses crt;var a:real;function PloshadKvadr(a:char):real; begin PloshadKvadr:=a*a; end;begin readln(a); writeln(PloshadKvadr(a));end.(a:real):real;Соответствующие фактические и

writeln(PloshadKvadr(a));
end.
(a:real):real;
Соответствующие фактические и формальные параметры должны совпадать по типу.


Слайд 8 var
a,b:integer;

function PloshadTrapecii(a,b:integer):real;
var
h:real;
begin
readln(h);
PloshadTrapecii:=((a+b)/2)*h;

var a,b:integer;function PloshadTrapecii(a,b:integer):real; var h:real; begin readln(h); PloshadTrapecii:=((a+b)/2)*h; end;begin readln(a,b); writeln(PloshadTrapecii(a,b));end.Ошибок нет ☺

end;

begin
readln(a,b);
writeln(PloshadTrapecii(a,b));
end.
Ошибок нет ☺


Слайд 9 uses crt;
var
a:integer;

function PloshadKvadr(a:integer):integer;
begin
PloshadKvadr:=a*a;
end;

begin
readln(a);

uses crt;var a:integer;function PloshadKvadr(a:integer):integer; begin PloshadKvadr:=a*a; end;begin readln(a); writeln(PloshadKvadr(a,a));end.Количество фактических параметров должно совпадать с количеством формальных(PloshadKvadr(a));

writeln(PloshadKvadr(a,a));
end.
Количество фактических параметров должно совпадать с количеством формальных
(PloshadKvadr(a));


Слайд 10 var
a,b,c:integer;

function step2(a:integer):integer;
begin
step2:=a*a;
end;

function Diskriminant(b,a,c:integer):real;

var a,b,c:integer;function step2(a:integer):integer; begin step2:=a*a; end;function Diskriminant(b,a,c:integer):real; var d:integer; begin d:=step2(b)-4*a*c;

var
d:integer;
begin
d:=step2(b)-4*a*c;
if d>=0 then Diskriminant:=SQRT(d)

else writeln ('нет корней');
end;

begin
readln (a,b,c);
writeln (Diskriminant(a,b,c));
end.

(Diskriminant(b,a,c));

Соответствующие фактические и формальные параметры должны совпадать по порядку следования и по порядку.


Слайд 11 Составить программу вычисления выражения:
N!+M!=?

Составить программу вычисления выражения:N!+M!=?

Слайд 12 uses crt;
war
n,m:integer;
otvet:integer;
















function fact (a:real) :integer;
var

uses crt;war n,m:integer; otvet:integer;function fact (a:real) :integer; var i,f:integer; Begin f:=1;

i,f:integer;
Begin
f:=1;
for i:=1 downto a

do f:=f*i;
fact:=0;
End;

BEGIN
writeLn(‘Введите N и M’);
readln(n,m);
otvet:= fact()+fact();
writeln(‘Решение:');
writeln(n, '!', '+' , m, '!=', fact(n), + , fact(m), '=', otvet);
END.

var

fact(n)+fact(m)

‘+’

(a:integer):integer;

to

fact:=f;



Слайд 13 Практическая работа
Каждые 3 минуты смена рабочего места

Практическая работаКаждые 3 минуты смена рабочего места

Слайд 14 Практическая работа
p=12
S=32
P=24

Практическая работаp=12S=32P=24

Слайд 15 Даны координаты точек треугольника. Найти его периметр.
 
 
P=A+B+C
Практическая работа
=12.78

Даны координаты точек треугольника. Найти его периметр.  P=A+B+CПрактическая работа=12.78

Слайд 16 uses crt;
var
xA,yA,xB,yB,xC,yC,AB,AC,BC,P:real;
function storona(x1,y1,x2,y2:real):real;
begin
storona:=sqrt(sqr(x2-x1)+sqr(y2-y1));
end;
BEGIN
writeln('Введите координаты точки A(x,y)');
readln(xA,yA);
writeln('Введите координаты

uses crt;varxA,yA,xB,yB,xC,yC,AB,AC,BC,P:real;function storona(x1,y1,x2,y2:real):real;begin storona:=sqrt(sqr(x2-x1)+sqr(y2-y1));end;BEGINwriteln('Введите координаты точки A(x,y)');readln(xA,yA);writeln('Введите координаты точки B(x,y)');readln(xB,yB);writeln('Введите координаты точки C(x,y)');readln(xC,yC);AB:=storona(xA,yA,xB,yB);AC:=storona(xA,yA,xC,yC);BC:=storona(xB,yB,xC,yC);P:=AB+AC+BC;writeln(‘Периметр P=',P:2:2);END.

точки B(x,y)');
readln(xB,yB);
writeln('Введите координаты точки C(x,y)');
readln(xC,yC);
AB:=storona(xA,yA,xB,yB);
AC:=storona(xA,yA,xC,yC);
BC:=storona(xB,yB,xC,yC);
P:=AB+AC+BC;
writeln(‘Периметр P=',P:2:2);
END.


Слайд 17  
Практическая работа

Y(1)=-0,263

 Практическая работаY(1)=-0,263

Слайд 18 ShdIKT

ShdIKT

  • Имя файла: prezentatsiya-k-uroku-funktsii-v-yap-pascal-9-klass.pptx
  • Количество просмотров: 174
  • Количество скачиваний: 0