IV. Mustahkamlash uchun savol va topshiriqlar




Download 5,1 Mb.
bet132/174
Sana22.05.2024
Hajmi5,1 Mb.
#250400
1   ...   128   129   130   131   132   133   134   135   ...   174
Bog'liq
Tasdiqlayman” Qo`shtepa ixtisoslashtirilgan maktabi mmibdo` S.

IV. Mustahkamlash uchun savol va topshiriqlar

  1. Chiziqli dastur deganda nimani tushunasiz?

  2. Qanday operatorlardan foydalanib muloqat dasturlari tuzish mumkin?

  3. Nima uchun dasturda  soniga qiymat berish shart emas?

  4. Chiqarish formati haqida so‘zlab bering.

  5. Ekrandagi natijani ko‘rish uchun qaysi klavishlar juftligi bosiladi?

Mashqlar
1. Quyidagi chiziqli dasturlarni ishini izohlang va natijasini aniqlang.

a)

Var a,b:String;
Begin
a:= ‘O`zbekiston ‘;
b:= ‘Davlat‘;
WriteLn(a, ‘Mustaqil ‘, b);
End.

b)

var a,b:Integer; s:Real;
Begin a:=4;
a:=sqr(a); b:=b–a;
s:=2*a+3*b;
WriteLn(‘S= ‘,s);
End.




Natija:
O`zbekiston Mustaqil Davlat




Natija:
S=-1.6000000000E+01

2. Quyida trapetsiya yuzini hisoblash dasturi tartibsiz yozilgan. Operatorlarni mantiqan to‘g‘ri ketma-ketlikda joylashtiring.
Program trapesiya_yuzi;
Var a,b,h:Integer; p,s:Real;
Begin Write(‘A,B,H qiymatlarni kiriting: ‘);ReadLn(a,b,h);
p := (a+b) /2; s := p * h; WriteLn(‘S =’, s,‘kvadrat birlik‘);
End.
3. Uchburchakning a, b tomonlari va ular orasidagi  burchak berilgan. Uchburchakning yuzini hisoblash dasturini tuzing.
Program uchburchak_yuzi;
Var a,b, alfa: real;
Begin
Write(‘a tomon uzunligini kiriting: ’); readln(a);
Write(‘b tomon uzunligini kiriting: ’); readln(b);
Write(‘alfa burchak kattaligini kiriting: ’); readln(alfa);
S:=a*b*sin(alfa)/2;
Writeln(‘S=’,s:5:2,’ kvadrat birlik.’);
Readln; end.

Download 5,1 Mb.
1   ...   128   129   130   131   132   133   134   135   ...   174




Download 5,1 Mb.

Bosh sahifa
Aloqalar

    Bosh sahifa



IV. Mustahkamlash uchun savol va topshiriqlar

Download 5,1 Mb.