1 жыл бойы шексіз жүктеңіз
Процедуралар

#1 слайд
Процедуралар
Информатика және есептеуіш
техника негіздері
8 сынып
1 слайд
Процедуралар Информатика және есептеуіш техника негіздері 8 сынып
#2 слайд
Процедура – кейбір әрекеттерді орындау
үшін қолданылатын көмекші.
Қолданылуы:
•программаның әр жерінде орналасқан
бірдей әрекеттерді орындау
•программаны түсіну оңай болу үшін
оны бірнеше қосалқы бөліктерге бөлу
2 слайд
Процедура – кейбір әрекеттерді орындау үшін қолданылатын көмекші. Қолданылуы: •программаның әр жерінде орналасқан бірдей әрекеттерді орындау •программаны түсіну оңай болу үшін оны бірнеше қосалқы бөліктерге бөлу
#3 слайд
Көмекші есеп1 Көмекші есеп2 Көмекші есеп3
1.11.21.3 2.12.22.3 3.13.23.3
Негізгі есеп
3 слайд
Көмекші есеп1 Көмекші есеп2 Көмекші есеп3 1.11.21.3 2.12.22.3 3.13.23.3 Негізгі есеп
#4 слайд
Есеп: Мына фигураны құру:
Белгілі әдістермен шешуге бола ма ??
4 слайд
Есеп: Мына фигураны құру: Белгілі әдістермен шешуге бола ма ??
#5 слайд
Ерекшелігі: Үш ұқсас фигура.
жалпы: өлшемдері, айналу бұрышы
айырмашылықтары: координаталары, түстері
Неше координата белгілеу керек ??
5 слайд
Ерекшелігі: Үш ұқсас фигура. жалпы: өлшемдері, айналу бұрышы айырмашылықтары: координаталары, түстері Неше координата белгілеу керек ??
#6 слайд
Есепті орындау тәртібі:
•бірдей немесе ұқсас әрекеттерді ерекшелеп алу (үш
фигура)
•олардың ұқсас жерлері (өлшемі, пішіні, айналу бұрышы)
мен айырмашылықтарын (координаталары, түсі) табу
•айырмашықтарын белгісіз айнымалылар түрінде өрнектеу,
осы айнымалылар процедураның параметрлері болады
(x, y)100
60 (x+100,
y)
(x, y-60)
6 слайд
Есепті орындау тәртібі: •бірдей немесе ұқсас әрекеттерді ерекшелеп алу (үш фигура) •олардың ұқсас жерлері (өлшемі, пішіні, айналу бұрышы) мен айырмашылықтарын (координаталары, түсі) табу •айырмашықтарын белгісіз айнымалылар түрінде өрнектеу, осы айнымалылар процедураның параметрлері болады (x, y)100 60 (x+100, y) (x, y-60)
#7 слайд
7 слайд
#8 слайд
Программа
program qq;
begin
Pen(1, 255, 0, 255);
Tr(100, 100, 0, 0, 255);
Tr(200, 100, 0, 255, 0);
Tr(200, 160, 255, 0, 0);
end.
program qq;
begin
Pen(1, 255, 0, 255);
Tr(100, 100, 0, 0, 255);
Tr(200, 100, 0, 255, 0);
Tr(200, 160, 255, 0, 0);
end.
(100,10
0)
10
0
6
0
процедура
нақтылы параметрлер
процедуран
ы
шақырулар
procedure Tr( x, y, r, g, b: integer);
begin
...
end;
формальды параметрлер
8 слайд
Программа program qq; begin Pen(1, 255, 0, 255); Tr(100, 100, 0, 0, 255); Tr(200, 100, 0, 255, 0); Tr(200, 160, 255, 0, 0); end. program qq; begin Pen(1, 255, 0, 255); Tr(100, 100, 0, 0, 255); Tr(200, 100, 0, 255, 0); Tr(200, 160, 255, 0, 0); end. (100,10 0) 10 0 6 0 процедура нақтылы параметрлер процедуран ы шақырулар procedure Tr( x, y, r, g, b: integer); begin ... end; формальды параметрлер
#9 слайд
Ерекшеліктері:
•барлық процедуралар негізгі программаның үстінде
орналасқан
•процедураның тақырыбында формальды
параметрлер жазылады, олар кейде өзгеріп
отыратындықтан атаулармен белгіленеді
•процедураны шақыру кезінде жақша ішінде нақтылы
параметрлер(сандар немесе арифметикалық
өрнектер) көрсетіледі
procedure Tr( x, y, r, g, b: integer);
Tr (200, 100, 0, 255, 0);
x y r g b
9 слайд
Ерекшеліктері: •барлық процедуралар негізгі программаның үстінде орналасқан •процедураның тақырыбында формальды параметрлер жазылады, олар кейде өзгеріп отыратындықтан атаулармен белгіленеді •процедураны шақыру кезінде жақша ішінде нақтылы параметрлер(сандар немесе арифметикалық өрнектер) көрсетіледі procedure Tr( x, y, r, g, b: integer); Tr (200, 100, 0, 255, 0); x y r g b
#10 слайд
Ерекшеліктері:
•әрбір формалды параметрдің қос нүктеден кейін типі
көрсетілуі қажет
•егер типтері бірдей параметрлер бірінен кейін бірі
орналасса, олардың арасы үтірмен ажыратылады
•процедураның ішіндегі параметрлер айнымалылар
секілді қолданылады
procedure A (x: real; y: integer; z: real);procedure A (x: real; y: integer; z: real);
procedure A (x, z: real; y, k, l: integer);procedure A (x, z: real; y, k, l: integer);
10 слайд
Ерекшеліктері: •әрбір формалды параметрдің қос нүктеден кейін типі көрсетілуі қажет •егер типтері бірдей параметрлер бірінен кейін бірі орналасса, олардың арасы үтірмен ажыратылады •процедураның ішіндегі параметрлер айнымалылар секілді қолданылады procedure A (x: real; y: integer; z: real);procedure A (x: real; y: integer; z: real); procedure A (x, z: real; y, k, l: integer);procedure A (x, z: real; y, k, l: integer);
#11 слайд
Ерекшеліктері:
•процедурада қосымша айнымалы ретінде
жергілікті(локальді) айнымалыларды пайдалануға
болады, басқа процедуралар оған қатынай алмайды
program qq;
procedure A(x, y: integer);
var a, b: real;
begin
a := (x + y)/6;
...
end;
begin
...
end.
procedure A(x, y: integer);
var a, b: real;
begin
a := (x + y)/6;
...
end;
локальді
айнымалыла
р
локальді
айнымалыла
р
var a, b: real;var a, b: real;
11 слайд
Ерекшеліктері: •процедурада қосымша айнымалы ретінде жергілікті(локальді) айнымалыларды пайдалануға болады, басқа процедуралар оған қатынай алмайды program qq; procedure A(x, y: integer); var a, b: real; begin a := (x + y)/6; ... end; begin ... end. procedure A(x, y: integer); var a, b: real; begin a := (x + y)/6; ... end; локальді айнымалыла р локальді айнымалыла р var a, b: real;var a, b: real;
#12 слайд
Параметр-айнымалылар
Есеп: екі айнымалы мәндерінің орындарын ауыстыратын
процедураны құру.
Ерекшеліктері:
Процедурада жасалған өзгертулер шақырушы
программаға белгілі болуы қажет.
program qq;
var x, y: integer;
begin
x := 1; y := 2;
Exchange ( x, y );
writeln ( ’x = ’, x, ’ y = ’, y );
end;
program qq;
var x, y: integer;
begin
x := 1; y := 2;
Exchange ( x, y );
writeln ( ’x = ’, x, ’ y = ’, y );
end;
procedure Exchange ( a, b: integer );
var c: integer;
begin
c := a; a := b; b := c;
end;
мына
процедура
параметрлердің
көшірмесімен
жұмыс істейді
x = 1 y = 2
12 слайд
Параметр-айнымалылар Есеп: екі айнымалы мәндерінің орындарын ауыстыратын процедураны құру. Ерекшеліктері: Процедурада жасалған өзгертулер шақырушы программаға белгілі болуы қажет. program qq; var x, y: integer; begin x := 1; y := 2; Exchange ( x, y ); writeln ( ’x = ’, x, ’ y = ’, y ); end; program qq; var x, y: integer; begin x := 1; y := 2; Exchange ( x, y ); writeln ( ’x = ’, x, ’ y = ’, y ); end; procedure Exchange ( a, b: integer ); var c: integer; begin c := a; a := b; b := c; end; мына процедура параметрлердің көшірмесімен жұмыс істейді x = 1 y = 2
#13 слайд
Параметр-айнымалылар
Қолданылуы:
процедура(және функция) осындай әдіс арқылы бірнеше
мән бере алады.
Шақыртудың тыйым салынған нұсқалары
Exchange ( 2, 3 ); { сандар }
Exchange ( x+z, y+2 ); { өрнектер }
procedure Exchange ( a, b: integer );
var c: integer;
begin
c := a; a := b; b := c;
end;
procedure Exchange ( a, b: integer );
var c: integer;
begin
c := a; a := b; b := c;
end;
var
параметрлер өзгере алады
13 слайд
Параметр-айнымалылар Қолданылуы: процедура(және функция) осындай әдіс арқылы бірнеше мән бере алады. Шақыртудың тыйым салынған нұсқалары Exchange ( 2, 3 ); { сандар } Exchange ( x+z, y+2 ); { өрнектер } procedure Exchange ( a, b: integer ); var c: integer; begin c := a; a := b; b := c; end; procedure Exchange ( a, b: integer ); var c: integer; begin c := a; a := b; b := c; end; var параметрлер өзгере алады
#14 слайд
Тапсырмалар
Процедураларды пайдалана отырып, мына фигураны құрастыру.
Процедураларды пайдалана отырып, мына фигураны құрастыру.
a
a a
0,866
∙a
Тең қабырғалы үшбұрыш
14 слайд
Тапсырмалар Процедураларды пайдалана отырып, мына фигураны құрастыру. Процедураларды пайдалана отырып, мына фигураны құрастыру. a a a 0,866 ∙a Тең қабырғалы үшбұрыш

Бұл курс Қазақстан Республикасы Оқу-ағарту министрлігімен келісілген