|
9 сынып. Информатика
|
Дата | 21.04.2017 | өлшемі | 16,94 Kb. | | #14196 | түрі | Сабақ |
| 9 сынып. Информатика. - Параметрлі цикл oператоры.
- білімділік: Оқушыларға параметрі бар қайталану коман-
- дасының арналу міндетін және программалау
- тілінде жазылу пішінін кең ауқымды түрде
- жазудың құралы ретінде көрсету. Есептерге
- параметрі бар қайталану командасын қолдана
- білу дағдысын қалыптастыру.
- дамытушылық: бағдарлама құру дағдысын, өзін – өзі бақы-
- лау, танымдық қызығушылығын дамыту.
- тәрбиелік: өз еңбегінің нәтижесіне ұқыптылыққа,
- жауапкершілікке тәрбиелеу;
- Құралдар: Дербес компьютерлер, мультимедиялық
- проектор, экран, тақта.
- Әдістемелік және бағдарламалық қамсыздандыру: Turbo Pascal 7.0, презентация, бағалау парағы, тест сұрақтары.
- Әдістері: талдау, сұрақ- жауап, проблема қою, зерттеу;
- Сабақ типі: жаңа сабақ;
- Пәнаралық байланыс: математика, ағылшын тілі.
- 1. Ұйымдастыру сәті.
- 2. Үй тапсырмасын тест арқылы тексеру.
- 3. Білімнің маңыздылығы. Проблемалық жағдаят туғызу.
- 4. Жаңа тақырып түсіндіру
- 5. Компьютерде тапсырманы өз бетімен орындау.
- 6. Сабақты бекіту.
- 7. Қорытындылау, үйге тапсырма.
- Цикл – белгілі бір әрекеттер тізбегінің бірнеше рет
- қайталанып орындалуы.
- қадамдар саны белгілі цикл
- қадамдар саны белгісіз цикл (шартты цикл)
- Есеп. 1-ден 8-ге дейінгі бүтін сандардың квадраттары мен кубтарын есептеп шығару (a-дан b-ға дейін).
- Ерекшелігі: бірдей амалдар 8 рет орындалады.
- Белгілі әдістермен шешуге бола ма?
- File Edit Search Run Compile Debug Tools Options Window Help
- ────────────────────────────1─────┐
- program ee;
- │var i,i2,i3:INTEGER;
- │begin
- │ i:=1;
- │ while i<=8 do
- │ begin
- │ i2:=i*i;
- │ i3:=i2*i;
- │ writeln('i=',i,' ','i2=',i2,' ','i3=',i3);
- │ i:=i+1;
- │ end;
- │end.
- ═════════════════════════════2═[↑]═╗
- ║i=1 i2=1 i3=1
- ║i=2 i2=4 i3=8
- ║i=3 i2=9 i3=27
- ║i=4 i2=16 i3=64
- ║i=5 i2=25 i3=125
- ║i=6 i2=36 i3=216
- ║i=7 i2=49 i3=343
- ║i=8 i2=64 i3=512
- ╚═◄■▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒►─┘
- i2 := i * i;
- i3 := i2 * i;
- цикл айнымалысының бастапқы мәнін көрсету
- барлығы да атқарылды ма? соны тексеру
- квадрат пен куб-ты есептейміз
- Алгоритм ("цикл" блогімен)
- i2 := i * i;
- i3 := i2 * i;
- for <айнымалы> := <алғашқы мән> to
- <ең соңғы мән> do begin
- {цикл денесі}
- end;
- for <айнымалы> := <алғашқы мән> downto
- <ең соңғы мән> do begin
- {цикл денесі}
- end;
| | - үшін Х бастап Хбас
- дейін Хсоң қадам Хқад
- цб
- цикл денесі
- цс
- Егер қадамның мәні 1
- тең болса, онда қадам
- қызметші сөзін жазбауға болады.
| - 1/ Х=1
- for X:=Xбас to Xсоң do
- begin
- цикл денесі
- end;
- 2/ X=-1
- for X:=Xбас downto Xсоң do
- begin
- цикл денесі
- end;
| - program qq;
- var i, i2, i3: integer;
- begin
-
- for i:=1 to 8 do begin
- i2 := i*i;
- i3 := i2*i;
- writeln(i:4, i2:4, i3:4);
- end;
- end.
- Айнымалысы кеміп отыратын цикл
- Есеп. 8-ден 1-ге дейінгі бүтін сандардың квадраттары мен кубтарын есептеп шығару (кері қарай есептеу).
- Ерекшелігі: цикл айнымалысы кеміп отыруы керек.
- Шығарылуы:
- for i:=8 1 do begin
- i2 := i*i;
- i3 := i2*i;
- writeln(i:4, i2:4, i3:4);
- end;
- Ерекшеліктері:
- цикл айнымалысының мәні бүтін немесе символдық типті болуы керек (integer,char немесе longint)
- цикл айнымалысының өзгеру қадамы қашанда 1-ге (to) немесе -1-ге (downto) тең
- егер цикл денесінде бір ғана оператор болса, begin мен end сөздерін жазбай кетуге болады:
- егер соңғы мән алғашқы мәннен кіші болса, (to) циклы бірде бір рет орындалмайды (шартты циклдың басында тексеру, шартты алдын ала тексеретін цикл)
- for i:=1 to 8 do
- writeln(‘Салем');
- Цикл неше рет орындалған?
- a := 1;
- for i:=1 to 3 do a := a+1;
- a := 1;
- for i:=3 to 1 do a := a+1;
- a := 1;
- for i:=1 downto 3 do a := a+1;
- a := 1;
- for i:=3 downto 1 do a := a+1;
- for i:=1 to 9 do begin
- if ??? then begin
- i2 := i*i;
- i3 := i2*i;
- writeln(i:4, i2:4, i3:4);
- end;
- end;
- Қадамдарды қалай өзгертуге болады?
- Есеп. Экранға 1-ден 9-ға дейінгі тақ сандардың квадраттары мен кубтарын есептеп шығару.
- Ерекшелігі: цикл айнымалысы 2-ге артып отыру керек.
- Мәселе: Паскальда қадамдар саны 1 немесе -1 болуы мүмкін.
- Шығарылуы:
- i2 := i*i;
- i3 := i2*i;
- writeln(i:4, i2:4, i3:4);
- Қадамдарды қалай өзгертуге болады?
- Тек 5 санды ғана шығару керек, k айнымалысы 1-ден 5-ке дейін өзгереді. i-дің бастапқы мәні 1-ге тең, циклдың әр қадамы сайын i 2-ге артып отырады.
- Шығарылуы:
- ???
- for k:=1 to 5 do begin
- i2 := i*i;
- i3 := i2*i;
- writeln(i:4, i2:4, i3:4);
- ???
- end;
- begin
- s:=0;
- for x:=-4 to 1 do
- s := s+х;
- writeln(‘s=’, s);
- end.
- Программа үзіндісінің орындалу нәтижесін (компьютерсіз) анықтау керек
Практикалық тапсырма. 1, 2, 3, ..., 15 сандары квадраттары кестесін құру керек. (Параметрдің бастапқы мәні Х=1, соңғы мәні Х=15, қадамның мәні Х=1) - Алг квадраттар кестесі (нәт бүт У) басы бүт Х
- цб У:=Х* Х шығару Х, У цс соңы
- Program keste; var x,y: integer; begin begin y:=sgr(x); writeln(x,y); end; end.
- Практикалық тапсырма. n-ші мүшесінің формуласымен берілген Хп=n2+5 тізбегінің алғашқы он мүшесін есептеу программасын құрыңдар.
Үйге тапсырма - Параметрлі цикл oператоры.
- n! санының факториалын есептеу.
Достарыңызбен бөлісу: |
|
|