400. Dastur natijasini aniqlang: Begin write(round(2.78); end. *a) 3
b) 2
c) 0.78
d) 0.2
401. Quyida write operatori necha marta bajariladi? for i:=1 to 3 do for j:=0 to 3 do write (i+j); *a) 12 marta
b) 1 marta
c) 3 marta
d) 9 marta
402. type hafta=(dush, sesh, chor, paysch, schanba, yaksch); var x,y: hafta; t:23..56; tavsiflash berilgan bo‘lsa, quyidagi ta’minlashlardan qaysi biri noto‘g‘ri? *a) y=t
b) x:=sesh
c) y:=x
d) t:=31
403. Quyida S ning qiymati nimaga teng? begin S:=0; for I:=1 to 3 do S:=S+2*i; writeln(S); end. *a) 12
b) 24
c) 48
d) 96
404. Dastur qiymati nimaga teng? begin X:=-2; y:=4; A:=-2; if A*A-y>x*x then z:=y+A else z:=X+A; writeln(z); end. *a) –4
b) –5
c) 1
d) 7
405. Quyida S ning qiymati nimaga teng? begin for j:=-2 to 3 do begin S:=0; S:=S+(j+1); end; writeln(S); end. *a) 4
b) 2
c) 10
d) 6
406. Dastur natijasini aniqlang. begin A:=12; B:=8; D:=20; if A>18 then D:=A-B; writeln(D); end. *a) 20
b) 5
c) 8
d) 4
407. Dastur natijasini aniqlang. begin X:=2; p:=1; 1:P:=P*(2*x-2); X:=X+3; if X<=6 then goto 1; writeln(P); end. *a) 16
b) 20
c) 2
d) 24
408. 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. *a) 8
b) 12
c) 10
d) 14
409. Kompyuter grafikasi tasvirlarni hosil qilish usullariga ko‘ra quyidagi turlarga bo‘linadi: *a) Rastrli (nuqtali) grafika; vektorli grafika; fraktal grafika; uch o‘lchovli (3D) grafika; kompyuter grafikasi va animatsiya
b) Rastrli (nuqtali) grafika; vektorli grafika; fraktal grafika; uch o‘lchovli (3D) grafika
c) Rastrli (nuqtali) grafika; vektorli grafika; fraktal grafika
d) Rastrli (nuqtali) grafika; vektorli grafika