Күрделі шарттар

Сыныбы 8_________________                                           Күні____________

Тексерген_________________                                         Пән мұғалімі: Нургожаев О.Б.    

Сабақтың тақырыбы: Курделі шарттар

Сабақтың мақсаты:

Білімділік мақсаты: Алгоритмдік тілдегі және Pascal программалау тіліндегі «Күрделі шарттар» командасы ұғымын енгізу; нақтылы есептерді шешу үшін алгоритмдер мен программаларды құру мысалдары арқылы осы командалардың жазылу пішіндерін көрсету.

Дамытушылық: Оқушылардың логикалық ойлау қабілеттерін дамыта отырып, есеп шығару, ұйымдастыра білуге үйрету. 

Тәрбиелік: Оқушыларды шығармашылыққа, әдептілікке тәрбиелеу.

Сабақтың типі: Демонстрациялық көрсетілім көмегімен баяндау.  

Программалық–дидактикалық қамсыздандыру: Компьютерде көрсету. Оқулық. Жұмыс дәптері.

Сабақ барысы.

І. Ұйымдастыру кезеңі: Сәлемдесу. Оқушыларды т‰гендеу.

ІІ. Өткен тақырыпты қайталау: Үйге берілген есепті тексеру, сұрақтар қою.

1. Тармақталу операторлары дегеніміз не?
2. Құрама оператор түрлері?
3. Тармақталу командасын атаңдар?

ІІІ. Жаңа тақырыпты оқыту:  Жаңа тақырыпты баяндау.

Күрделлі шарттар

Күрделі шарттар Және, немесе, емес қызметші сөздерімен біріктірілген, бірнеше қарапайым шарттардан тұратын шарттар (логикалық өрнектер) күрделі шарттар деп аталады. Паскаль тіліндегі логикалық операциялар: And (және) логикалық операциясы бар күрделі шарт қарапайым шарттардың екеуі де орындалған жағдайда ғана ақиқат деп есептеледі. Ал егер қарапайым шарттардың кемінде біреуі орындалса, онда or (немесе) логикалық операциясы бар күрделі шарт ақиқат деп есептеледі. Not (емес) А=0 логикалық операциясы А≠0 шартымен бірдей. Кейбір есепте үш және одан да көп тармақ, яғни шығу сызықтары бар шарттарды тексеруге тура келетін кездер кездеседі. Бұған мысал ретінде квадрат теңдеу ах2 + bx + c = 0, (a ≠ 0) түбірлерін табатын программа құруды қарастырайық.

Мысал:

y=

Program funciya;

Var x,y:integer;

Begin

Writeln(‘x-ti engiz’);

Readln(x);

If 0x and x≤1 then y:=0

Else if x>0 then y:=exp(x) else y:=(x+2);

Writeln(‘jauabi y=’,y);

End.

IV. Бекіту: Есеп шығару:

PROGRAM 1 (INPUT, OUTPUT);

VAR X, Y:REAL;

BEGIN

WRITE (‘X енгіз:’);

READLN (X);

IF (X>16) and (X<26)

THEN Y:=X+50

ELSE Y:=2*X+20;

WRITELN (‘Y=’, Y);

END.

V.Бағалау: Сабақта тапсырманы орындағанына, меңгерген деңгейіне байланысты бағалаймыз.

VІ. Үй тапсырмасы: Өткен тақырыпты оқып келу. Квадрат теңдеудің түбірлерін табатын бағдарлама құру.

Есеп шығару