Тапсырма №1.Сұрақ- жауап While операторының қызметі
Қайталану операторы дегеніміз не?
While операторының шарты қандай болады?
Repeat операторының шарты қандай болады?
Repeat операторын қолдану кезінде, циклдің денесі бір рет те орындалмауы мүмкін бе?
Параметрі бар циклдік оператор қандай жағдайларда қолданылады?
Параметр мәндері азаю кезінде, параметрі бар циклдік оператор қалай жасалады?
Параметрі бар циклдік оператор неше рет орындалады?
Тапсырма №2.30-дан 10-ға дейінгі барлық жұп сандарды экранға шығаратын программа құрыңдар. Program jup;
Var i: integer;
Begin
Writeln (’30-dan 10-ga deingi jup san’);
For i:=30 downto 10 do
If 2=0 then
Writeln (i);
End.
Тапсырма №3. 5- тен 1-ге дейінгі сандардың қосындысын есептеу керек. Program kosindi;
Var I, s:integer;
Begin
S:=0;
For i:=5 downto 1 do
S:=S+I;
Writeln (‘s = ‘, s);
End.
Тапсырма №4.1-ден 9-ға дейінгі тақ сандардың қосындысыншығаратын программа құрыңдар.
PROGRAM ESEP1; VAR I, S: INTEGER; BEGIN S:=0; FOR I:=1 TO 9 DO IF I MOD 2=1 THEN S:=S+I; WRITEL
Берілген тапсырманы орындайды.
Қосымша деректер
жинақтайды.
Нәтижеге бағытталған білім алады.
Берілген тапсырманы орындайды.
Сабақтың соңы 5 мин
Қорытындылау. Бүгінгі сабақтан үйренген жақсы қасиеттерін еске түсіріп, айтып береді.
Оқушыларға сабақтың тақырыбы мен мақсаты хабарланады.
Оқушылар сабаққа дайындалады
Сабақтың мақсаты мен тақырыбын біледі
Сабақтың ортасы
Тапсырма №1.Кіріктірілген циклдердің көмегімен деректерді n=5 жағдайы үшін тіктөртбұрыш түрінде экранға шығар. Тапсырманы орындауға ұсыныс: шарт тексеру операторымен циклдарды кірістіріп пайдаланған тиімді. i=j=0 for i in range(1,6): for j in range(1,6): print(i*j,end="\t") print()
Тапсырма №2. Сұрақ жауап 1. Кірістірілген циклдердің жай циклдерден қандай айырмашылығы бар? 2. Кірістірлген циклдердің орындалу уақытын қалай есептеуге болады?
3. Бірнеше циклді кірістіріп пайдаланудың программа Өздерін-өзі бағалайды. жұмысына кері әсері қандай ? 4. Деректерді тіктөртбұрышты кесте түрінде беру программасын жазуда қай оператордың жұмысы маңызды саналады?
Тапсырма №3.1 ден 15 ке дейінгі барлық бүтін сандардың квадраттарының қосындысын табыңдар. program esep; var i,x,s:integer; begin s:=0; for i:=1 to 15 do
begin x:=sqr(i); s:=s+x; end; write(s); end.
Тапсырма №4.Натурал сан берілген. Ол сандардың қосындысы оннан кем емес екені рас па? program esep; var i,a,j,s:integer; begin s:=0; read (j); for i:=1 to j do s:=s+i; if s>=10 then write ('10-нан кем емес')else write ('10-нан кем'); write(s); end.
Берілген тапсырманы орындайды.
Қосымша деректер
жинақтайды.
Нәтижеге бағытталған білім алады.
Берілген тапсырманы орындайды.
Сабақтың соңы 5 мин
Қорытындылау. Бүгінгі сабақтан үйренген жақсы қасиеттерін еске түсіріп, айтып береді.
