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
x:=sesh
y:=x
d) t:=31
Quyida S ning qiymati nimaga teng? begin S:=0; for I:=1 to 3 do S:=S+2*i; writeln(S); end.
*a) 12
24
48
96
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
–5
1
7
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
2
10
6
Dastur natijasini aniqlang. begin A:=12; B:=8; D:=20; if A>18 then D:=A-B; writeln(D); end.
*a) 20
5
8
4
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
20
2
24
Do'stlaringiz bilan baham: |