047 Program a47;

CONST X=PI;

VAR Y, Z: REAL;

BEGIN

Y: =X/2;

Z: =COS (Y);

WRITE (Z);

END.

Баспаға не шығады

A) 0.25

B) 1.25

C) 1

D) 2

E) 0

{Дұрыс жауабы}=E

048 Курсорды келесі қатарға өткізу жұмысын орындайтын енгізу операторы

A) READ

B) WRITE

C) READLN

D) WRITELN

E) INPUT

{Дұрыс жауабы}=C

049 Транслятор дегеніміз не

А) аудармашы

В) командалық қамтамасыз ету

С) барлық программаларды екілік жүйеге аударушы

D) машина кодына аудару жұмысын орындаушы программа

Е) машина коды

{Дұрыс жауабы}=D

050 Program a50;

CONST a=3; B=4;

VAR C, d: INTEGER;

BEGIN

C: =a*a +SQR (B)

d: =SQRT (B)

WRITE (D)

END.

Баспаға не шығады

A) 2

B) 11

C) 25

D) 4

E) 5

{Дұрыс жауабы}=A

051 Айнымалыларды сипаттау операторлары

А) LABEL

В) ARRAY

С) CONST

D) VAR

E) TYPE

{Дұрыс жауабы}=D

052 Program a26;

VAR B: ARRAY [1..3] OF INTEGER;

P,I: INTEGER;

BEGIN

B[1]:=2; B[2] :=1; B[3]:=3; P:=2;

FOR I:=1 TO 3 DO

P:=P*SQR(B[I]);

WRITE(P)

END.

Баспаға не шығады

A) 576

B) 6

C) 36

D) 72

E) 476

{Дұрыс жауабы}=D

053 Символдарды бөліп алу операторы

A) STR

B) DELETE

C) VAL

D) POS

E) LENGTH

{Дұрыс жауабы}=B

054 Параметрлі қайталау (цикл) операторлары

A) CASE-OF-END

B) WHILE-DO

C) REPEAT- UNTIL

D) IF-THEN-ELSE

E) FOR-TO-DO

{Дұрыс жауабы}=E

055 Шарт цикл басында болатын қайталау операторлары

A) REPEAT- UNTIL

B) IF-THEN-ELSE

C) WHILE-DO

D) CASE-OF-END

E) FOR-TO-DO

{Дұрыс жауабы}=C

056 Шарт цикл соңында болатын қайталау операторлары

A) WHILE-DO

B) CASE-OF-END

C) FOR-TO-DO

D) REPEAT- UNTIL

E) IF-THEN-ELSE

{Дұрыс жауабы}=D

057 Таңдау операторлары

A) WHILE-DO

B) CASE-OF-END

C) IF-THEN-ELSE

D) REPEAT- UNTIL

E) FOR-TO-DO

{Дұрыс жауабы}=B

058 Шартты өту операторлары

A) IF-THEN-ELSE

B) CASE-OF-END

C) FOR-TO-DO

D) WHILE-DO

E) REPEAT- UNTIL

{Дұрыс жауабы}=А

059 Шартсыз өту операторы

A) TO

B) IF

C) ELSE

D) CASE

E) GOTO

{Дұрыс жауабы}=E

060 Program a37;

VAR D: ARRAY [1..2,1..2] OF INTEGER;

P,K: INTEGER;

BEGIN P:=0;

D[1,1]:=-1; D[1,2] :=2; D[2,1]:=3;

D[2,2]:=-3;

FOR K:=1 TO 2 DO

IF D[K,K] >0 THEN P:=P+1;

WRITE (S)

END.

Баспаға не шығады

A) 2

B) 0

C) 5

D) 4

E) 1

{Дұрыс жауабы}=B

061 Символдық шаманы сандық шамаға ауыстыру операторы

A) VAR

B) POS

C) VAL

D) STR

E) LENGTH

{Дұрыс жауабы}=C

062 Program a38;

VAR A: ARRAY [1..2,1..2] OF INTEGER;

S,I,J: INTEGER;

BEGIN S:=0;

A[1,1]:=-1; A[1,2] :=2; A[2,1]:=4;

A[2,2]:=-2;

FOR I:=1 TO 2 DO

FOR J:=1 TO 2 DO

IF A[I,J] <0 THEN S:=S+A[I,J];

WRITE (S)

END.

Баспаға не шығады

A) 2

B) 0

C) -3

D) 6

E) 9

{Дұрыс жауабы}=C

063 Бір символдық шаманың екінші символдық шаманың ішіне ену орнын анықтау операторы

A) LENGTH

B) VAL

C) STR

D) DELETE

E) POS

{Дұрыс жауабы}=E

064 Массивтерді сипаттау операторлары

A) ARRAY

B) FUNCTION

C) TYPE

D) LABEL

E) CONST

{Дұрыс жауабы}=A

065 Program a48;

CONST a=2;

VAR Y, Z: INTEGER;

BEGIN

X: =2-a;

Y: =EXP (X);

WRITE (Z);

END.

Баспаға не шығады

A) 8

B) 4

C) 1

D) 2

E) 0

{Дұрыс жауабы}=C

066 Курсорды келесі қатарға өткізу жұмысын орындайтын баспаға шығару операторы

A) WRITELN

B) PRINT

C) READ

D) READLN

E) WRITE

{Дұрыс жауабы}=А

067 Program a24;

CONST X=-2;

VAR Z : INTEGER;

BEGIN

IF (X>-3) AND(X<-1) THEN Z:= SQR(X)

ELSE Z:=9;

Z := SQRT(Z);

WRITE (Z)

END.

Баспаға не шығады

A) 2

B) 4

C) 3

D) -3

E) -1

{Дұрыс жауабы}=A

068 1.8 Е-4 санының ондық бөлшек түрінде жазылуы

A) 1.8

B) 0.18

C) 0.000018

D) 0.00018

E) 0.0018

{Дұрыс жауабы}=D

069 Массивті сипаттайтын қызметші сөз:

A) FILE..OF

B) SET..OF

C) ARRAY…OF

D) RECORD…END

E) OF… ARRAY

{Дұрыс жауабы}=C

070 Комбинирленген тип ... қызметші сөзімен сипатталады:

A) RECORD…END

B) SET..OF

C) FILE..OF

D) ARRAY…OF

E) END

{Дұрыс жауабы}=A

071 Көптік тип ... қызметші сөзімен сипатталады:

A) RECORD…END

B) FILE..OF

C) END

D) ARRAY…OF

E) SET..OF

{Дұрыс жауабы}=E