Информатика. Цикльді алгоритм.

Смайлова Гүлсайран Рысмұқанбетқызы. Ақтөбе  облысы, Шалқар ауданы, Мөңке би ауылы, М.Тәжин атындағы орта мектеп.

Сабақтың мақсаты:
Циклді алгоритм түсінігін қалыптастыру, Оқушыларды  алгоритм  құра білуге үйрету. Алгоритм мен программа құруды салыстыра отырып есептер шығару, өз бетімен ізденушіліккке, шығармашылпен жұмыс жасауға баулу. Есептер шығару арқылы алгоритмдік және логикалық ойлау қабілетін дамыту
Сабақтың түрі: аралас  сабақ
Сабақтың  көрнекілігі: ДК, интерактивті тақта, Сабақтың толық нұсқасын көрнекіліктерімен бірге көшіріп алыңыз.
Оқыту формалары: жеке, топтық және ұжымдық.

І. Ұйымдастыру кезеңі.
ІІ Үйге берілген тапсырманы тексеру.
Үй тапсырмасын қорытындылау мақсатында тест алу.

Жаңа сабақ  Цикльді алгоритм
*****
Қайталау саны белгілі цикл

Блок схема Алгоритмдік тіл Pascal

*****

Параметрлі қайталану командасы:
Үшін Х бастап хбаст хсоңықадам
1-нұсқа (санағыштың мәні өседі, Хқад =1 )
For  X: = X бас  to X соң  do
begin
цикл  денес
end1-нұсқа (санағыштың мәні кемидіі, Хқад =-1 )For  X: = X бас downto X соң  do
begin
цикл  денесі
end

Қайталау саны белгісіз  цикл

Блок схема Алгоритмдік тіл Pascal


           иә                            жоқ

Цикл денесі

 

 

Қайталану командасы:
Әзір  шарт
цб
Цикл денесі
цс
Алдын ала тексеру циклі
While  шарт  do
Begin
цикл денесі
end;шарттың соңынан тексеретін цикл:
repeat
цикл денесі
(серия);
until   шарт;

Мысал есеп:

  1. 1,2,3…….,10 сандардың қосындысын есептеуге арналған алгоритм мен программа құру.

Блок схемасы:

Алг     Қосынды                                                                          
program
Басы   арг х, нәт s
Var x,s,:real;
S=0
begin
S үшін х =1 баст   х=10 ,
S=0
S=s+x
for x:=1 to 10 do
S –ті алу
S=s+x;  next x;
Соны
write(s);    end.
Слайдта берілген мысалды талдаймыз
Мысал: 1,3,5,      15 сандар тізбегі кваадраттарының  кестесін құру керек
Алг  квадрат кестесі(нәт бүт у)
Басы бүт  х
х:= 1
әзір х<=15
цб
у:=  х2
шығару х,у
х: = х+2
цс
соңы

Program
var x,y: integer;
begin
while x<= 15 do
begin
y= sqr(x)
writeln (x, y);
x:=x+2
end;
end.

Сабақты қорытындылау мақсатында берілген есептерді талдап не шығатынын

Егер 9 санын енгізлсе, бұл программаны орындағанда қандай сан шығады?
Var x,y: real;
begin
readln(x);
IF x <=0 then y=sqr(x) else y: sqrt(x);
writeln (y);
end.
Егер 4 саны енгізілсе, бұл программаны орындағанда қандай сан шығады?
Var k,a,:integer;
begin
Readln(k);
a:=k+10;
k:=k+a;
writeln (k);
end;
Егер 64 саны енгізілсе, бұл программаны орындағанда қандай сан шығады?
Var x,y,:real;
begin
Readln(x);
y:=sqrt(x);
writeln (y);
end;

Программаны орындау нәтижесінде қандай сан шығады?
begin
s:=0;
for i:=-4 to 1 do
s:=s +I;
write(s);
end.

Бағалау
Үйге тапсырма : Циклді алгоритм
Есеп 1ден 10 дейінгі сандардың  көбейтіндісін  есептеу. Алгоритм және программа құру

Сабақтың толық нұсқасын көрнекіліктерімен бірге көшіріп алыңыз.

Check Also

Аудандық олимпиада. ІІ-тур. 2016-2017 оқу жылы.

D есебі 5 бүтін сандар берілген. Осы сандардың арасынан төртеуін таңдағандағы қосындының ең үлкен жəне …

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *

Лимит времени истёк. Пожалуйста, перезагрузите CAPTCHA.