.const s=2;
var L: integer; P: real;*
Шартты оператордың дұрыс вариантын көрсет
. if шарт then *
Программаны орындау нәтижесінде экранға не шығады?
Begin
S:=0;
For j:=1 to 5 do S=S+j;
Write (S); End. 15*
2-ден 20-ға дейінгі жұп сандарды шығаруға негізделген программа үзіндісін көрсет:
. For i:=1 to 10 do begin*
K:=2*i;
WRITE( K )
end;
Егер a=2,25; b=0,001; c=12 болса, онда readln(a,b,C); операторының нәтижесі неге тең? -C. 2,25 0,001 12 Enter*
Дұрыс шешімді көрсет: y=A. Program esep;*
Var x, y: real;
Begin
Read(x);
If x>=0 then y:=x else y:=-x;
Write (‘x=’,x, ‘y=’,y);
End.
Егер X=7, Y=15, Z=11, R=450,08 болса, онда Write (X,’_,_’,Y); операторының жұмыс нәтижесін көрсет: 7_,_15*
Егер X=7, Y=15, Z=11, R=450,08 болса, онда Write (‘X=’,X); операторының жұмыс нәтижесін көрсет: X =7;*
Егер X=7, Y=15, Z=11, R=450,08 болса, онда Write (X,’’:3,Z); операторының жұмыс нәтижесін көрсет: 7 11;*
Егер X=7, Y=15, Z=11, R=450,08 болса, онда Write (‘X+Y=’,X+Y); операторының жұмыс нәтижесін көрсет:X+Y =22; *
Егер X=7, Y=15, Z=11, R=450,08 болса, онда Write (Z,’- нәтиже‘); операторының жұмыс нәтижесін көрсет:11- нәтиже; *
Егер X=7, Y=15, Z=11, R=450,08 болса, онда Write (R); операторының жұмыс нәтижесін көрсет: 4,5008Е+2*
Программа үзіндісін орындағаннан кейін Х саны неге тең?
x:=5;
if x>=5 then x:=x*2 else x:=-x;
x:=x*5;
x= 50*
Программа үзіндісін орындағаннан кейін А және В сандары неге тең?
a:=1; b:=2;
if a
then a:=a+2
else if a>b
then b:=b+2
a=2; b=2;*
Программа үзіндісін орындағаннан кейін А және В сандары неге тең?
a:=1; b:=2;
if a>b then a:=a+1 else a:=b
Достарыңызбен бөлісу: |
