Dasturda o’zgarmaslar bo’limi qaysi so’z bilan boshlanadi?
| |
|
Const
| |
Belgilar (nishonalar) bo’limi qaysi so’z bilan boshlanadi?
|
Label
|
Parametrli sikl operatori xizmat so’zlari qaysi javobda to’g’ri keltirilgan?
|
for, to, do;
|
Paskal tilida operatorlar bir-biridan qaysi belgi bilan ajratiladi?
|
Nuqta vergul
|
Paskalning grafik muxitida to’g’ri burchakli turtburchak chizuvchi prosedurani ko’rsating
|
Rectangle(X1,Y1,X2,Y2);
|
Grafik rejimni yopuvchi prsedura.
|
CloseGraph;
|
Dastur natijasi nimaga teng? var a,b,x:real; begin a:=8; b:=a/2; x:=A/B; x:=asqr(sqrt(x+b/2)); writeln(x); end.
|
32
|
Quyidagi operator necha marta takrorlanadi? for x:=1 downto 10 do write (x);
|
1 marta
|
Quyida write operatori necha marta bajariladi? for i:=1 to 3 do for j:=0 to 3 do write (i+j);
|
12 marta
|
Quyida S ning qiymati nimaga teng?
Begin S:=0; for I:=1 to 3 do S:=S+2i; writeln(S); end.
|
12
|
Dastur qiymati nimaga teng? begin X:=-2; y:=4; A:=-2; if AA-y>xx then z:=y+A else z:=X+A; writeln(z); end.
|
–4
|
Quyida S ning qiymati nimaga teng? Begin for j:=-2 to 3 do begin S:=0; S:=S+(j+1); end; writeln(S); end.
|
4
|
Dastur natijasini aniqlang. begin A:=12; B:=8; D:=20; if A>18 then D:=A-B; writeln(D); end.
|
20
|
Dastur natijasini aniqlang. begin X:=2; p:=1; 1:P:=P(2x-2); X:=X+3; if X<=6 then goto 1; writeln(P); end.
|
16
|
Hisob natijasini aniqlang? begin A:=10; B:=8; C:= 6; if (A>B) and (C>B) then y:=A+B-C else y:=A-B+C; writeln(y); end.
|
8
|
Hisob natijasini aniqlang? begin a:=12; b:=14; c:=10; if (a>b) or (b>c) then y:=a+b-c else y:=a-b+c; writeln(y); end.
|
16
|
Quydagi programma nimani chop etadi?. VAR X,Y: REAL; BEGIN X:=25; Y:=SQRT(SQR(X)); Y:=X-Y; WRITE(Y) END.
|
0
|
PASKAL-programmaning ishlashi natijasida nima hisoblanadi? program m1; var x,y,z: real; begin read(x,y,z); if x
|
x , u , z sonlarning kattasining kubi;
|
|
