Информатикадан практикалық жұмыс сабақ жоспары

Күні:

9 сынып

Сабақтың тақырыбы:

Практикалық жұмыс

Сілтеме

9-сынып оқулығы.

Жалпы мақсаттар

Оқушылардың ІІ тарау бойынша алған білімдерін жинақтап, тиянақтау.

Оқыту нәтижесі

Оқушылар ІІ тарау бойынша алған білімдерін тиянақтау, практика барысында жақсы көрсеткіш көрсетіп, компьютерде жұмыс жасау барысында мұқият орындай алады.

Сабақтың әдісі

Баяндау, сұрақ-жауап, диалог, топпен жұмыс, АКТ, қолдану, электронды оқулықпен жұмыс, Сын тұрғысынан ойлау («Ой тастау», «Мағынаны тану», «Топтастыру», «Тест жұмыс» )

Жалпы

Білу

Үй тапсырмасы.

Түсіну

Мағынаны тану

Қолдану

Оқулықпен жұмыс

Талдау

Практикалық жұмыс

Жинақтау

Корытынды

Бағалау

Екі жұлдыз бір тілек

Сабақ барысы

Уақыты

Мұғалімнің іс-әрекеті

3 минут

Психологиялық дайындық

5 минут

3 минут

20 минут

2 минут

3 минут

1 минут

Сыныппен сәлемдесу. Сыныпты ұйымдастыру (оқушыларды тексеру, аудиторияны қалыпқа келтіру)

Оқушыларды сызықтық, тармақталған, циклдік деп кеспе қағаздарға жазып таңдау арқылы топқа бөлу.

Оқушыларды бүгінгі сабақтың тақырыбымен және мақсатымен таныстыру.

«Білу»

І. Үй тапсырмасы. Пысықтау сұрақтары.

ІІ. «Түсіну»Оқулықтан практикалық жұмыстардың орындалуын түсіндіру.

ІІІ.«Қолдану»

Тест тапсырмасын орындау.

№1 Кез келген екі өлшемді массивтің ең үлкен элементін табу программасын кұр.

Program m1;

Var A:array [1..100,1..100] of integer;

n,m,i,j,max:integer;

Begin

Writeln(‘массивэлементiненгiз’);

readln(n,m);

randomize;

For i:=1 to n do

for j:=1 to m do

A [i,j]:=-25+random(100);

For i:=1 to n do Begin

writeln;

For j:=1 to m do

write (A[i,j]:4); end;

max:=A[1,1];

For i:=1 to n do

For j:=1 to n do

if A[i,j]>max then max:=A[i,j];

writeln;

writeln (‘max=’,max:5);

readln

end.

№2 Кезкелгенекіөлшемдімассивтегіоңэлементерсанынтабупрограммасынқұру

Program E2;

Var A: array [1..100, 1..100] of integer;

i,n,m,j,k:integer;

begin

randomize;

writeln(‘massiv olhemin engiz’);

Readln(n,m);

For i:=1 to n do

For j:=1 to m do

A[i,j]:=-25+random(100);

For i:=1 to n do begin

writeln;

for j:=1 to m do

write (A[i,j]:5); end;

k:=0;

for i:=1 to n do

for j:=1 to m do

if A[i,j]>0 then k:=k+1;

writeln;

writeln(‘онэлементтерсаны=’,k);

Readln

end.

№3 Кезкелгенекіөлшемдімассивтіңеңкішіэлементініңжолномеріменбағанномерінтабупрограммасынқұру.

Program m3;

Var A:array [1..100,1..100] of integer;

n,m,i,j,min,k,l:integer;

Begin

Writeln(‘massiv olshemderin engiz’);

Writeln(‘jol olshemin engiz’);