Dars maqsadi:
Bobga doir o‘quvchilar tomonidan olingan bilim, ko‘nikmani amaliyotga tadbiq eta olish malakasiga egaligi aniqlanadi.
Takrorlash uchun berilgan masalalar yechimlaridan namunalar:
Ikkita a va b sonlar berilgan. Agar b son a dan kichik bo‘lmasa, u holda b ni nol bilan almashtiring, aks holda b o‘zgarishsiz qolsin.
Program mashq1;
var a,b:Real;
begin
Write('a='); ReadLn(a);
Write('b='); ReadLn(b);
If a
WriteLn('a=',a,' b=',b);
end.
a, b, c sonlar berilgan. Ularning eng kattasi max (a,b,c) ni toping (sonlar ichida tenglari ham bo‘lishi mumkin: max (5,0,5)=5, max (8,8,8)=8).
Program maksimum;
Var a,b,c,max : Real;
Begin
Write('a='); ReadLn(a);
Write('b='); ReadLn(b);
Write('c='); ReadLn(c);
If a>b Then max:=a Else max:=b;
If max
WriteLn(‘max=’, max );
End.
Ikkita x, y sonlar berilgan (x ≠ y). Ular ichida eng kichik sonni bu ikki son yig‘indisining yarmi bilan almashtiring, eng kattasini esa bu sonlarning ko‘paytmasi bilan almashtiring.
Program x_va_y;
Var x,y : Real;
Begin
Write('x='); ReadLn(x);
Write('y='); ReadLn(y);
If x>y Then
begin x:=x*y; y:=(x+y)/2; end;
Else
begin y:=x*y; x:=(x+y)/2; end;
WriteLn(‘x=’, x, ‘ y=’,y);
End.
N natural son berilgan. ko‘paytmani hisoblang.
Program kupaytma;
Var n, i : Integer;
p : Real;
Begin
Write(‘n='); ReadLn(n);
P:=1; i:=-1;
Repeat
i:=i+2;
p:=p*i/(2*i);
Until i=n+2 ;
WriteLn(‘P=’, p);
End.
A(N) sonlar massivi elementlarini yangi B(N) massivga teskari tartibda ko‘chiring (b1=aN, b2=a(N-1), …, bN=a1).
Program massiv;
Const n1=100;
Var a, b : Array[1..n1] of Real;
n, i : Integer;
Begin
Write(‘n='); ReadLn(n);
{a massiv elementlarini kiritish}
For I:=1 to n Do
begin
Write(‘a(’,I, ‘)=’); ReadLn(a[i]);
end;
{b massivni hosil qilish}
For I:=1 to n Do
begin
b[i]:=a[n-i+1];
end;
End.
Tasdiqlayman O`IB direktor
o`rin bosari_________________
Sana _____________IX- sinf
– dars. Paskalda ekranni grafik holatga o‘tkazish
Dars maqsadi:
O’quvchilarga ekranning grafik holati haqida tushuncha berish va ekranni grafik holatga o‘tkazish usullari bilan tanishtirish.
Darsning ta`limiy vazifasi: O`quvchilarga mustaqil fikrlashni o`rgatish
Darsning tarbiyaviy vazifasi: O`quvchilarning vatanga muhabbat ruhida tarbiyalash:
Darsning rivojlantiruvchi vazifasi: O’quvchilarni kompyuter savodxonligini oshirish
Uslub: Ma’ruza va amaliyot.
Shakl: Savol – javob, kichik guruhlarda ishlash.
Vosita: Elektron resurslar, darslik va ko’rgazmalar
Usul: slayd materiallari
Nazorat: og’zaki, savol-javob va kuzatish.
Baholash: Rag’batlantirish, 5 ballik reyting tizimi asosida
Do'stlaringiz bilan baham: |