Қысқа мерзімді сабақ жоспары №5
Пәні: Информатика Сыныбы:9
Мерзімі:
Пән мұғалімі:
Тексерілді
Директордың оқу ісі жөніндегі орынбасары
Сабақтың тақырыбы: Файл және оны баптау,
Сілтеме
9 – сынып оқулығы
Мақсаты
файлдармен жұмыс істеу амалдарымен танысу. Программалау тілінде файлдармен жұмыс істеуді ұйымдастыру
Күтілетін нәтиже
файлдарды екі негізгі белгісі бойынша топтастыруды біледі.
Әдіс - тәсілдері
жеке жұмыс, топтық жұмыс
Пәнаралық байланыс
математика
Оқыту модулі
АКТ, СТО
Сабақ кезеңдері
Мұғалімнің әрекеті
Оқушының әрекеті
Ұйымдастыру кезеңі
1. Сынып оқушыларына жағымды ахуал туғызу
2. Топқа бөлу
Жалаушалар таңдау арқылы топқа бөлінеді.
Мағынаны тану
№1есеп
Program Esep; {сынып журналы}
var f: text;
t:string[30];
n,i,fi,ma,inf, ist: byte;
begin
assign(f,'c:\klass.txt'); write('окушылар саны');
rewrite(f); readln(n);
writeln('Окушьшардын аты-жони, онын бағалары:');
{файлды жазу};
for i:=l to n do
begin
readln(t);writeln(f,t);
readln(f,fi,ma,inf,ist); writeln (f,fi,ma,inf,ist);
end;
close(f);
{файлдан оку};
Reset(f); for i:=l to n do
begin
readln(f,t); writeln(t);
readln(f,fi,ma,inf,ist); writeln (f,fi,ma,inf,ist);
end;
close(f);
end.
№2 есеп
Оқушылар жаңа тақырыпты оқиды, мұғалім көмегімен бір-біріне түсіндіреді. Дәптерге жазып алады.
Есептер шығару
Program Esep; {сынып журналы}
Аты-жөні (t)
Бағалар
Физика (fi)
Математика (та)
Информатика (inf)
Тарих (ist)
Кәршов A
5
4
3
2
Kөшеров Б
5
5
5
5
Мерекенов Т
4
5
5
4
ТР-да
Program Esep1; {Үздик окушыларды тандау}
var f: text;
t:string[30];
n,i,fi,ma,inf,ist: byte;
begin
assign(f,'c:\klass.txt');
reset(f);
readln(n);
for i:=l to n do
begin
readln(f,t);
readln(f,fi,ma,inf,ist);
if fi+ma+inf+ist=20 then writeln (f,fi,ma,inf,ist);
end;
close(f);
end.
Оқушылар есепті алдымен тақтаға немесе дәптерге, содан кейін Паскаль программалау тіліне программаны енгізіп, нәтижесін алады. Жеке орындайды.
Бағалау
Бағалаудың іске асуын бақылайды.
Топтар бір-бірін критериалды бағалау жүйесі арқылы бағалайды.
Үйге тапсырма
Тақырыпты мазмұндап, оқып келу.
integer типті N элементтен тұратын файлды жасайтын программа құрыңдар. Тек жұп элeмeттepi ғана шығару.
program_6;{^oi' yeaiai6oa6} var f:text;m,s,i,n:integer; begin
assign(f, 'c :\kl,txt') ;rewrite(f) ;readln(n);
for i:=l to n do
begin
readln(m) ;writeln(f,m);
end;
close(f);
reset(f); for i:=l to n do
readln(f,m);if not odd(m) then writeln(m);
end;
close(f);
end.
Күнделіктеріне үй тапсырмасын жазады
Кері байланыс
Тақырып түсінікті болды.
Себебі...
Тақырып түсініксіз болды.
Себебі...
Оқушылар кері байланыс парағын толтырады.
