9-sinf amaliy mashg’ulot olimpiada javoblari

9-sinf amaliy mashg’ulot olimpiada javoblari

1.Quyidagi dasturda a o’zgaruvchining “O’ZBEKISTONIM”; “VATANIM”; “ONA DIYORIM” qiymatlarini xotiraga qulay usulda kiritib natija oling.

Echilishi:
Var a, b, g: string;

Begin

Write(‘a ning qiymatini kiriting a=’); readln(a)

b:= ‘ – SAJDAGOH KABI‘; g:= ‘ MUQADDASDIR!‘; write(a, b, g); readln;

End.
2. Radiusi R ga teng doira yuzini hisoblash dasturi:

Var s,r:real;

Label 1,2,3;

Begin

3:writeln(‘doira radiusini kiriting r=’);readln(r);

If r<=0 then goto 1;

S:=pi*sqr(r);writeln(‘s=’,s);

Goto 2;

1:writeln(‘radiusga musbat son kiriting’);goto 3;

2:readln;

end.
3. Mos ravishda R1, R2, R3, R4 qarshilikka ega bo‘lgan o‘tkazgichlar parallel ulanganda hosil bo‘ladigan R qarshilikni hisoblash dasturini tuzing (yo’llanma: 1/R=1/R1+1/R2+1/R3+1/R4).

Echilishi:

Program qarshilikni_hisoblash;

Uses crt;

Var R,R1,R2,R3,R4: real;

Begin clrscr;

Writeln(‘R1 ni kiriting: ’); readln(R1);

Writeln(‘R21 ni kiriting: ’); readln(R2);

Writeln(‘R3 ni kiriting: ’); readln(R3);

Writeln(‘R4 ni kiriting: ’); readln(R4);

R:=R1*R2*R3*R4/(R2*R3*R4+R1*R3*R4+R1*R2*R4+R1*R2*R3);

Writeln(‘R=’,R:5:2,’ birlik.’); readln;

End.

4. Quyidagi sxema chiqishida 0 hosil bo`lishi uchun kirishda qanday qiymatlar bo`lishi kerak ?

5. karra jadvalini hosil qiluvchi dastur tuzing

uses crt;

var i,n:integer;

begin clrscr;

write('n=');readln(n);

for i:=1 to 9 do

writeln (n,'*',i,'=',n*i);

readln;

end.
9-sinf amaliy mashg’ulot olimpiada javoblari

1.Quyidagi dasturda a o’zgaruvchining “O’ZBEKISTONIM”; “VATANIM”; “ONA DIYORIM” qiymatlarini xotiraga qulay usulda kiritib natija oling.

Echilishi:
Var a, b, g: string;

Begin

Write(‘a ning qiymatini kiriting a=’); readln(a)

b:= ‘ – SAJDAGOH KABI‘; g:= ‘ MUQADDASDIR!‘; write(a, b, g); readln;

End.
2. Radiusi R ga teng doira yuzini hisoblash dasturi:

Var s,r:real;

Label 1,2,3;

Begin

3:writeln(‘doira radiusini kiriting r=’);readln(r);

If r<=0 then goto 1;

S:=pi*sqr(r);writeln(‘s=’,s);

Goto 2;

1:writeln(‘radiusga musbat son kiriting’);goto 3;

2:readln;

end.
3. Mos ravishda R1, R2, R3, R4 qarshilikka ega bo‘lgan o‘tkazgichlar parallel ulanganda hosil bo‘ladigan R qarshilikni hisoblash dasturini tuzing (yo’llanma: 1/R=1/R1+1/R2+1/R3+1/R4).

Echilishi:

Program qarshilikni_hisoblash;

Uses crt;

Var R,R1,R2,R3,R4: real;

Begin clrscr;

Writeln(‘R1 ni kiriting: ’); readln(R1);

Writeln(‘R21 ni kiriting: ’); readln(R2);

Writeln(‘R3 ni kiriting: ’); readln(R3);

Writeln(‘R4 ni kiriting: ’); readln(R4);

R:=R1*R2*R3*R4/(R2*R3*R4+R1*R3*R4+R1*R2*R4+R1*R2*R3);

Writeln(‘R=’,R:5:2,’ birlik.’); readln;

End.

4. Quyidagi sxema chiqishida 0 hosil bo`lishi uchun kirishda qanday qiymatlar bo`lishi kerak ?

5. karra jadvalini hosil qiluvchi dastur tuzing

uses crt;

var i,n:integer;

begin clrscr;

write('n=');readln(n);

for i:=1 to 9 do

writeln (n,'*',i,'=',n*i);

readln;

end.


9-sinf amaliy mashg’ulot olimpiada savollari
1.Quyidagi dasturda a o’zgaruvchining “O’ZBEKISTONIM”; “VATANIM”; “ONA DIYORIM” qiymatlarini xotiraga qulay usulda kiritib natija oling.

2. Radiusi R ga teng doira yuzini hisoblash dasturi:
3. Mos ravishda R1, R2, R3, R4 qarshilikka ega bo‘lgan o‘tkazgichlar parallel ulanganda hosil bo‘ladigan R qarshilikni hisoblash dasturini tuzing (yo’llanma: 1/R=1/R1+1/R2+1/R3+1/R4).
4. Quyidagi sxema chiqishida 0 hosil bo`lishi uchun kirishda qanday qiymatlar bo`lishi kerak ?

5. Karra jadvalini hosil qiluvchi dastur tuzing


9-sinf amaliy mashg’ulot olimpiada savollari
1.Quyidagi dasturda a o’zgaruvchining “O’ZBEKISTONIM”; “VATANIM”; “ONA DIYORIM” qiymatlarini xotiraga qulay usulda kiritib natija oling.

2. Radiusi R ga teng doira yuzini hisoblash dasturi:
3. Mos ravishda R1, R2, R3, R4 qarshilikka ega bo‘lgan o‘tkazgichlar parallel ulanganda hosil bo‘ladigan R qarshilikni hisoblash dasturini tuzing (yo’llanma: 1/R=1/R1+1/R2+1/R3+1/R4).
4. Quyidagi sxema chiqishida 0 hosil bo`lishi uchun kirishda qanday qiymatlar bo`lishi kerak ?

5. Karra jadvalini hosil qiluvchi dastur tuzing