9 cынып информатика пәні мұғалімдеріне арналған сабақ жоспары пайдалануға болады. Қауіпсіз техникасы ережесі туралы сабақ жоспары. Күнтізбелік жоспар бойынша бірінші сабақ . Информатика пәні мұғалімдеріне сабаққа қолдануға өте ынғайлы барлығы толық түсінікті жазылған анық шрифпен 14 қолдануға рұқсат. жақсы материал
САБАҚ ЖОСПАРЫ
«Бекітемін»
________________
Оқу
ісінің меңгерушісі
«___________» ________20 ж
Пән аты: Информатика
Класы: 9 «А», 9 «Б», 9 «В», 9 «Г»
Сабақтың тақырыбы Айнымалы типтер. Мәліметтердің шектеулі типтері.
Бірөлшемді жиым элементтерімен жұмыс.
Сабақтың мақсаты
Білімділік: Оқушыларды бірөлшемдіжиымдарға есептер
шығаруға үйрету.
Дамытушылық: Оқушылардың пргарамма құру барысында логкалық
ойлау қабілеттерін дамыту
Тәрбиелік: Оқушыларды ұқыптылыққа, жинақылыққа тәрбиелеу.
Сабақтың түрі: практикалық сабақ
Сабақтың барысы: 1.Ұйымдастыру
2. Өткен материалдарды қайталау
3. Компьютермен жұмыс
4. Сабақты бекіту
5.Үйге тапсырма
Компьютермен жұмыс
№1. 10 элементтен тұратын А массивтің элементтерін енгізу және шығару
программасын құру керек.
Program esepl:
Uses crt:
Var l:integer:
A:array [l..10] of integer;Begin
Clrscr;
For i:=l to 10 do
Begin
Writeln( ‘a[‘,I,’]-? ’);
Readln (a[i]);
End;
For i:=l to 10 do
Writeln(‘a[‘,I, ’]=’,a[i]);
End
№2. Берілген бір өлшемді A{2,-3,5,8,-2} массив элементтерінің қосындысын
есептейтін прграмма жазу керек.
Program esep2:
Uses crt;
Var I,s:integer:
A: array [l…5] of integer;
Begin
Clrscr;
For i:=1to 5 do
Begin S:= 0;
Writeln(`a[`,I`]-?`);
Readln(a[i]);
End;
For i:=1 to 5do
Begin
S:=S+a[i];
Writeln(`S[`,I,`]=`,S);
End;
End.
№3 Берілген бір өлшемді А{2,-3,5,-8,2} ма ссив элементтерінің
квадраттарының қосындысын есептеу программасын құру керек.
Program esep3;Uses crt;
Var I,s:integer:
A: array [l…5] of integer;
Begin
Clrscr;
For i:=1to 5 do
Begin S:= 0;
Writeln(`a[`,I,` ]-?`);
Readln(a[i]);
End;
For i:=1 to 5do
Begin
S:=S+sqr(a[i]);
Writeln(`S[`,I,`]=`,S);
End; End.
№4.Берілген бір өлшемді А{2,-3,5,-8,2} массив берілген, оң элементтерін
баспаға шығаратын программа құру керек
Program esep4;
Uses crt;
Var I:integer:
A: array [l…5] of integer;
Begin
Clrscr;
For i:=1to 5 do
Begin
Writeln(`a[`,I,` ]-?`);
Readln(a[i]);
End;
For i:=1 to 5do
Begin
If (a[i])>0 then Writeln(`a[`,I,`]=`,a[i]);
End; End.№5.Бірөлшемді А{2,-3,5,-8,2} массив берілген, теріс элементтерін баспаға
шығаратын программа құру керек.
Program esep5;
Uses crt;
Var I:integer;
A: array [l…5] of integer;
Begin
Clrscr;
For i:=1to 5 do
Begin
Writeln(`a[`,I,` ]-?`);
Readln(a[i]);
End;
For i:=1 to 5do
Begin
If (a[i])>0 then Writeln(`a[`,I,`]=`,a[i]);
End; End.
№6. Бірөлшемді А{2,-3,5,-8,2} массив элементтерінің ең үлкен баспаға
шығаратын программа құру керек.
Program esep6;
Uses crt;
Var I, max :integer:
A: array [l…5] of integer;
Begin
Clrscr;
For i:=1to 5 do
Begin
Writeln(`a[`,I,` ]-?`);
Readln(a[i]);
End;
Max:= a [I];
For i:=2to 5doBegin
If max<(A[i]) then max :=a[i]);
End.
Сабақты бекіту сұрақтары
Қарапайым және күрделі типтерді қалай ажыратамыз?
Жиым дегеніміз не?
Жиым элементтерінің орны қалай анықталады?
Үйге тапсырма : 133 бет, 1-4 тапсырмалар.
19.docx
