Кірістірілген шарттарды программалау

            Ұйымдастыру: журнал бойынша сабақта жоқтарды белгілеу.

            Білімдерін тексеру, құрамдық шарттың құрылымын еске түсіру және өмірмен байланысты жағдайды шешу  арқылы сабақтың тақырыбын ашу:

Тапсырма 1. Шартты операторды қолданып  «Егер ертең ауа температурасы -25 Цельсий градусынан кем және жел жылдамдығы 10м/с  болса, онда біз оқымаймыз.  Басқаша,  егер ертең ауа температурасы -25 Цельсий градусынан артық және жел жылдамдығы 10м/с кем  болса, онда біз оқимыз.».

            Оқушыларды сабақ тақырыбымен, сабақ мақсаттарымен және жетістік критерийлерімен таныстыру.

            (W) Салынған тармақталудың тәсілдерін түсіндіру

1 тәсіл:

if <шарт1> then

                        if <шарт2> then                           <Операторлар1>                           else                            <Операторлар2>                          end

            else              <Операторлар3>              end;

2 тәсіл:

if <шарт1> then

            <Операторлар1>      

            else 

                        if <шарт2> then                            <операторлар2>                           else                            <операторлар3>                           end end;

Физминутка.

(W) Есеп шығару:

Есеп 1: Екі сан берілген. Екі санды салыстыру. Экранда «екі бүтін санды еңгізіңіз»  санды еңгізуге шақырыс пайда болу керек. Пайдаланушы кез келген санды еңгізе алады, мысалы, 36 немесе 54. Бағдарлама экранға нәтижені шығару керек; «Бірінші сан екінші саннан кем». Егер пайдаланушы бірінші 54 содан кейін 36 еңгізсе, онда бағдарлама экранға «Бірінші сан екінші саннан артық» деп шығарады.

жауабы:

program sravnenie; var a,b: integer; begin write('Екі санды еңгізіңіз); readln(a,b); if a>b then write (' Бірінші сан екінші саннан кем')                    else                          if a<b then write (' Бірінші сан екінші саннан артық')                           else write ('сандар тең'); end.

Тапсырма 2: Екі бүтін сан берілген. Егер олар оң болса, онда оларға 1-ді қосыңыздар; егер теріс болса, онда одан 2-неазайтыңыздар; егер нольге тең болса, онда оны 10-мен ауыстырыңыздар. Алынған санды шығарыңыздар. 

Жауабы:

program ifprimer;

var

  a: integer;

begin

  read(a);

  if a >= 0 then

    if a = 0 then a := 10 else Inc(a) { else алдында нүктелі үтір жоқ.}

   else a -= 2;

  write(a);

end.

(I) Жоба бойынша жұмыс

Оқушылар жеке меншік жобаларды дайындауда салынған тармақталуды қолданады.