3-kurs kollej o`quvchilari uchun tuman bosqichi olimpiada yozma ish materiallari

3-kurs kollej o`quvchilari uchun tuman bosqichi olimpiada yozma ish materiallari

1. Kubning qirrasi (a) berilgan. Uning hajmini va yon tomoni yuzasini hisoblovchi dasturi tuzilsin.

2. To’g’ri burchakli uchburchakning katetlari a va b berilgan. Uchburchakning gepatenuzasi (c) va yuzi (s) ni hisoblovchi programma tuzing.
3. Ikkita haqiqiy musbat son berilgan. Shu sonlarning o’rta arifmetigini va o`rta geometrigini aniqlovchi programma tuzilsin.
4. Teng tomonli uchburchakning tomoni (a) berilgan. Uchburchakning yuzini hisoblovchi programma tuzilsin.


Kaliti:


1-masala.
Program masala1;
var a,V,S:real;
begin
Readln(a);
V:=exp(3*ln(a));
S:=6*sqr(a);
Writeln ('Kubning hajmi ',V);
Writeln ('Kubning yon tomoni yuzasi ',S);
end.

2-masala.
Program masala2;
var a,b,c,S:real;
begin
Write ('a katetni kiriting '); Readln (a);
Write ('b katetni kiriting '); Readln (b);
c:=sqrt(sqr(a)+sqr(b));
S:= (a+b)/2;
Writeln ('Gepatenuzasi ', c);
Writeln ('Yuzi ',S);
end.


3-masala.
Program masala3;
var a,b,arif,geo:real;
begin
Readln (a,b);
arif:=(a+b)/2;
geo:=sqrt(a*b);
Writeln ('Arifmetigi ',arif);
Writeln ('Geometrigi ',geo);
end.

4-masala.

Program masala4;
var a,S:real;
begin
Readln (a);
S:=((sqrt(3))/4)*sqr(a);
Writeln ('Javob ',S);
end.