Barcha fanlardan Testlar to‘plami

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;
Quydagi ifoda a=5, b=15, c=2 bo’lsa qanday natija beradi? ( a+ b div c 4 ) mod 5 div 3	1
Operasiyalar natijasini to`g`ri tanlang. round(trunc(-5,875) +0.8)+5	-1
Operasiyalar bajarilganda j ni qiymatini tugri tanlang. j:= round (frac(3,875))5 +4	9
U ning qiymati nimaga teng?. VAR X,Y:REAL; BEGIN X:=5.7; IF X<2 THEN Y:=sqr(X) ELSE; IF X<5 THEN Y:=2 ELSE Y:=X-5; Y:=ROUND(Y); END.	1