Salomlashish.
Davomatni aniqlash.
O`quvchilarning va sinfning darsga tayyorgarligini tekshirish
II.O`tilgan mavzuni mustahkamlash:
masalalar yechish
Quyidagi mazmunda dastur tuzing: kiritilgan N (1program masala68_4;
uses crt, graph;
label 1;
var gd,gm,i,x,y,n,r: integer;
begin
clrscr;
write('n ning qiymatini kiriting=');readln(n);
gd:=0; initgraph(gd,gm,'');
x:=trunc(getmaxx/2); y:=trunc(getmaxy/2);
for i:=1 to n do
circle(x,y,10*i);
readln;
end.
Berilgan N (N>21) xonali son 2 ga, 3 ga bo’lingandagi qoldig’ini aniqlovchi dastur tuzing.
program masala68_5;
uses crt;
label 1;
var i,r_s,r_y,o_r,r,cod: integer; ch,son:string;
begin
clrscr;
write('Sonni kiriting=');readln(son);
r_s:=length(son);val(son[r_s],o_r,cod);
if o_r mod 2 = 0 then
writeln('2 ga bo`lishdagi qoldiq= 0')
else writeln('2 ga bo`lishdagi qoldiq=1');
for i:=1 to r_s do
begin val(son[i],r,cod);
r_y:=r_y+r;
end;
Writeln;
Writeln('3 ga bo`lishdagi qoldiq=', r_y mod 3);
readln;
end.
IV.O`tilgan mavzuni mustahkamlash:
O`tilganlarni mustahkamlash uchun o`quvchilar bilan savol-javob o`tkaziladi. Berilgan savollarga to`g`ri javob bergan o`quvchilar baholanadi.
V.Darsning yakunlash va o`quvchilarni baholash.Darsda faol ishtrok etgan o`quvchilarni baholash va rag`batlantirish,mavzu bo`yicha o`quvchilarni fikr-mulohazalarni tinglash,savollarga javob berish va yakun yasash.
IV. Uyga vazifa: N sonini barcha bo’luvchilari sonini topuvchi dastur tuzing.
DO’TIBO’: B.R.Sirojeva Sana:_______________
Do'stlaringiz bilan baham: |