Шарт?а дейінгі циклдер

П?ні: информатика                                                                           «Тексерілді»

                                                                                                   Мектеп директорыны?

П?н м??алімі: Серікбаев П.                                                  о?у ісі ж?ніндегі орынбасары:

                                                                                               _________________ Изетова Х.

№19 саба?                                                                          

9г – 26.01.15ж

9е,з – 27.01.15ж

9?,б,д - 28.01.15ж

9а,в,ж – 29.01.15ж

Саба?ты? та?ырыбы: §7. Шарт?а дейінгі циклдер. REPEAT – UNTIL операторлары.

Саба?ты? ма?саты:

Білімділік: О?ушыларды Паскаль программалау тілінде шарт?а дейінгі циклды? алгоритмдерді  жаза білуге да?дыландыру;

Т?рбиелік: О?ушыларды компьютерде д?рыс ж?мыс жасау?а т?рбиелеу.

Дамытушылы?:  О?ушыларды? алгоритмдеу т?сілдері мен ?дістерін ?олдану ?абілеттерін дамыту.

Саба?ты? т?рі: Практикум элементі бар, к?рсете т?сіндіру саба?ы.

Саба?та ?олданылатын к?рнекі ??ралдар: интерта?та, компьютер, о?улы?.

Саба?ты? ?тілу барысы:

1. ?йымдастыру кезе?і.
2. ?й тапсырмасын с?рау .
3. Жа?а саба?
4. О?ушыларды? та?та мен компьютердегі дербес ж?мыстары.
5. ?йге тапсырма.
6. Саба?ты бекіту, ?орыту ж?не о?ушыларды ба?алау.

І. ?йымдастыру кезе?і:    а) о?ушылармен с?лемдесу;

                                               б) о?ушыларды т?гелдеу;

ІІ.?й тапсырмасын с?рау.

III. Жа?а саба?ты? мазм?ны:

              Б?гінгі саба?та ?айталау операторыны? денесін (т?л?асын/сериясын) шарттан б?рын орындау?а м?мкіндік беретін Паскальды? жа?а операторымен танысамыз.

Жазылу т?рі:

Repeat

Операторлар

UNTIL  <шарт>;

операторлар

repeat–until операторыны? while – do-?а ?ара?анда ?ш айырмашылы?ы бар:

1.  Шарт циклдан б?рын тексеріледі, сонды?тан серия кем дегенде бір рет ат?арылады.

2. Repeat операторында шарт а?и?ат (и?)  бол?анда ?айталау (цикл) ая?талады.

3.  Repeat операторында ?айталау со?ы шартпен ая?талады.

Алды??ы саба?та ?арастыр?ан 1-ден n-ге дейінгі сандар ?осындысын есептейтін программаны repeat-until ар?ылы жазып к?рейік:

                    Program esep1;

                        Var s,i,n: integer;

                        Begin

                        S:=0; i:=1;

                        Write(‘б?тін сан енгіз’);

                        Read(n);

                        Repeat

                        S:=s+i;

                        I:=i+1;

                        Until (i>n);

                        Write(‘s=’,s);

                        End.

IV. О?ушыларды? та?та мен компьютердегі дербес ж?мыстары:

70 бет. №5 есеп. Бірінші n к?бейткіштерді? к?бейтіндісін есепте?дер:

Program esep2;

                        Var p,i,n: integer;

                        Begin

                        p:=1; i:=1;

                        Write(‘б?тін сан енгіз’);

                        Read(n);

                        Repeat

                        p:=p+(2*i-1)/i;

                        i:=i+1;

                        Until (i>n);

                        Write(‘p=’ , p);

                        End.

V. Саба?ты бекіту, ?орыту ж?не о?ушылар білімін ба?алау.

VІ. ?йге тапсырма: §7. П.2. Шарт?а дейінгі циклдер. REPEAT – UNTIL                                                                 

                                          операторлары. 70 бет, №13 Практикалы? ж?мыс, №6 есеп