Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
53
Добавлен:
13.03.2015
Размер:
1.26 Mб
Скачать

$$$113 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (‘X+Y=’,X+Y);

A) 11- результат

B) X+Y =22

C) end

D) 4,5008+2

E) 555

{Правильный ответ}=B

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$114 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (Z,’- результат‘);

A) 11- результат

B) X+Y =22

C) end

D) 4,5008+2

E) 666

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$115 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (‘end ‘);

A) 11- результат

B) X+Y =22

C) end

D) 4.5008+2

E) 45

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$116 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (R);

A) 11- результат

B) X+Y =22

C) end

D) 4.5008E+2

E) 33

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$117 Укажите результат 20 mod 7 + 5 div 4*2

A) 0

B) 11

C) 2

D) 8

E) 33

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$118 Укажите результат 48 mod (2+3) div 4

A) 0

B) 11

C) 2

D) 8

E) 10

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$119 Укажите результат ((24 mod 7+5) div 4)*2:

A) 4

B) 11

C) 2

D) 8

E) 10

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$120 Укажите результат 16 mod (7+9) div 3*2

A) 0

B) 11

C) 2

D) 8

E) 10

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$121 Укажите результат Х : x div 5 = x mod 5

A) 30

B) 45

C) 43

D) 12

E) 10

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$122 Укажите результат Х: 20 div x = 20 mod x

A) 0

B) 10

C) 19

D) 12

E) 11

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$123 Укажите результат Х:x div 5 = 8

A) 30

B) 75

C) 53

D) 42

E) 12

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$124 Укажите результат Х:50 mod x = 7

A) 3

B) 7

C) 43

D) 1

E) 13

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$125 Каковы значения Х и У после выполнения: x:=15 div (8 mod 3);

y:=17 mod x*5-19 mod 6*2;

A) x=7; y=13

B) x=7; y=4

C) x=12; y=7

D) x=1; y-7

E) x=5

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$126 Каковы значения Х и У после выполнения:x:=2*5 div 3 mod 2;

y:=2*5 div(3 mod 2);

x:=x*y; y:=y*y ;

A) x=10; y=10

B) x=7; y=49

C) x=12; y=144

D) x=10; y=100

E) x=11

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$127

После выполнения фрагмента программы , чему будет равно число Х

x:=5;

if x>=5 then x:=x*2 else if x<=10 then x:=-x;

x:=x*5

A) x= 5

B) x=10

C) x=-5

D) x=50

E) x=8

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$128 После выполнения фрагмента программы , X будет равно числу

x:=5;

if x>=5 then x:=x*2 else if x<=10 then x:=-x;

A) x= 5

B) x=10

C) x=-5

D) x=-10

E) x=22

{Правильный ответ}=B

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$129 После выполнения фрагмента программы , чему будет равно число А и В

a:=1; b:=2;

if a<b then a:=a+1 else if a=b

then a:=a+2

else if a>b

then b:=b+2

A) a= 2; b=5

B) a=10; b=2

C) a=-2; b=4

D) a=2; b=2

E) a=6

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$130 После выполнения фрагмента программы , будет равно числу Аи В?

a:=1; b:=2;

if a>b then a:=a+1 else a:=b

A) a= 2; b=2

B) a=2; b=1

C) a=2; b=4

D) a=1; b=2

E) a=7

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$131 После выполнения фрагмента программы , А и В будет равно числу

a:=12; b:=2;

if a<b then a:=a+10 else b=b*2

A) a=12; b=2

B) a=22; b=12

C) a=12; b=4

D) a=24; b=2

E) a=8

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$132 После выполнения фрагмента программы , А и В равна

a:=2; b:=4;

if a<b then a:=a+2 else if a=b

then a:=a+2

else if a>b

then b:=b+2

A) a=2; b=5

B) a=10; b=2

C) a=-2; b=4

D) a=4; b=4

E) a=7

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$133 Как записывается на Паскале выражение

A) y:=sqr(sqrt(cos(2*x)))*cos(2*x)+sqr(sqr(5*x+3))*(5*x+3)+sqr(sin(2*x))*sin(2*x))

B) y:=sqrt(sqr(cos(2*x)))*cos(2*x)+sqr(sqr(5*x+3))*(5*x+3)+sqr(sin(2*x))*sin(2*x))

C) y:=sqrt(sqr(cos(2*x))*cos(2*x)+sqr(sqr(5*x+3))*(5*x+3)+sqr(sin(2*x))*sin(2*x))

D) y:=sqrt(sqr(cos(2*x))))*cos(2*x)+sqr(sqr(5*x+3))*(5*x+3)+sqr(sin(2*x))*sin(2*x)

E) y:=(sqrt(sqr(cos(2*x)))*cos(2*x)+sqr(sqr(5*x+3))*(5*x+3)+sqr(sin(2*x))*sin(2*x))

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$134 Как записывается условный оператор для решения функции.

A) IF X<0 THEN Y:=5*SQRT(X)+6 ELSE IF (X>0)

AND (X<6) THEN Y:=SQR(X)-35 ELSE Y:=7,1*X-7;

B) IF X>0 THEN Y:=5*SQR(X)+6 ELSE IF (X>0)

AND (X<6) THEN Y:=SQR(X)-35 ELSE Y:=7,1*X-7;

C) IF X<0 THEN Y:=5*SQR(X)+6 ELSE IF (X>0)

AND (X<6) THEN Y:=SQR(X)-35 ELSE Y:=7.1*X-7;

D) IF X<0 THEN Y:=5*SQR(X)+6 ELSE IF X>0

AND X<6 THEN Y:=SQR(X)-35 ELSE Y:=7,1*X-7

E) AND X<6 THEN Y:=SQR(X)-35 ELSE Y:=7,1*X-7

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$135 Вычислите значение S.

S:=0; I:=1;

WHILE I<10 DO

Begin

S:=S+(2*I+1);

I:=I+2;

A) 52

B) 55

C) 75

D) 65

E) 33

{Правильный ответ}=B

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$136 Сколько раз выполнится тело цикла

N:=0;

FOR I:=1 TO 3*N+4 DO

N:=N+2;

A) 2

B) 5

C) 4

D) 3

E) 11

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$137 Укажите правильный вариант записи.

A) Массив ARRAY [1 . . N] OF

B) Массив ARRAY [1 . . N] OF REAL

C) Массив ARRAY [1 . . N]

D) Массив ARRAY [1 . . N] REAL

E) Массив ARRAY [1 . . N] Integer

{Правильный ответ}=B

{Сложность}=3

{Тема}=4

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$138 Дана матрица A[10,10]. Построить массив B[10]по следующему правилу: элементы B[1]- сумма элементов 1-ой строки, B[2]-сумма элементов 2-ой строки.

A) FOR I:=1 TO 10 DO BEGIN

FOR J:=1 TO 10 DO BEGIN

B[I]:=B[I]+A[I,J];

END;

WRITELN (B[I]);

END;

B) FOR I:=1 TO 10 DO BEGIN

FOR J:=1 TO 10 DO BEGIN

B[I]:=B[I]+A[I,J];

END; END;

WRITELN (B[I]);

C) FOR J:=1 TO 10 DO BEGIN

FOR I:=1 TO 10 DO BEGIN

B[I]:=B[I]+A[I,J]; END;

WRITELN (B[I]);

END;

D) FOR I:=1 TO 10 DO BEGIN

FOR J:=1 TO 10 DO BEGIN

B[I]:=B[I]+A[I,J];

WRITELN (B[I]);

END; END;

E) FOR I:=1 TO 10 DO BEGIN

FOR J:=1 TO 10 DO BEGIN

B[I]:=B[I]+A[I,J];

WRITELN (B[I]);

END;

{Правильный ответ}=A

{Сложность}=3

{Тема}=4

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$139 Дана матрица A [12,12]. Найти максимальный элемент матрицы.

A) MAX:=A[1,1]

FOR I:=1 TO 6 DO

FOR J:=1 TO 12 DO

IF A[2*I,J]>MAX THEN MAX:=A[2*I,J];

B) MAX:=A[2.1]

FOR I:=2 TO 6 DO

FOR J:=1 TO 12 DO

IF A[2*I,J]>MAX THEN MAX:=A[2*I,J];

C) MAX:=A[1,1]

FOR I:=1 TO 12 DO

FOR J:=1 TO 12 DO

IF A[I,J]>MAX THEN MAX:=A[I,J];

D) MAX:=A[2.1]

FOR I:=1 TO 12 DO

FOR J:=1 TO 12 DO

IF A[2*I,J]>MAX THEN MAX:=A[2*I,J];

E) FOR J:=1 TO 12 DO

IF A[2*I,J]>MAX THEN MAX:=A[2*I,J];

{Правильный ответ}=C

{Сложность}=3

{Тема}=4

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$140 Дана матрица A[12,12]. Присвоить нечетным столбцам отрицательные значения.

A) FOR I:=2 TO 6 DO

FOR J:=1 TO 12 DO

IF A[2*I-1,J]<0 THEN A[2*I-1,J]:=0;

B) FOR I:=1 TO 6 DO

FOR J:=1 TO 12 DO

IF A[2*I-1,J]<0 THEN A[2*I-1,J]:=0;

C) FOR I:=2 TO 12 DO

FOR J:=1 TO 12 DO

IF A[2*I-1,J]<0 THEN A[2*I-1,J]:=0;

D) FOR I:=1 TO 12 DO

FOR J:=1 TO 6 DO

IF A[I,2*J-1]>0 THEN A[I,2*J-1]:=-A[I,2*J-1];

E) FOR J:=1 TO 6 DO

IF A[I,2*J-1]>0 THEN A[I,2*J-1]:=-A[I,2*J-1];

{Правильный ответ}=D

{Сложность}=3

{Тема}=4

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$141 Дано число а вывести числа а в следующем порядке

a

a3 a6

a6 a3 a

A) PROGRAM PRTAB

VAR a,a3,a6:integer;

Begin read (A)

a3:=a^3; a6=sqr(a3);

Writeln(A) ; writeln(a3,a6); writeln(a6,a3,A)

EnD)

B) PROGRAM PRTAB

VAR a,a3,a6:integer;

Begin read (A)

a3:=a*a*a; a6=sqr(a3);

Write(A) ; writeln(a3,a6); writeln(a6,a3,A)

EnD.

C) PROGRAM PRTAB

VAR a,a3,a6:integer;

Begin read (A)

a3:=a*a*a; a6=sqr(A)

Writeln(A) ; writeln(a3,a6); writeln(a6,a3,A)

EnD;

D) PROGRAM PRTAB

VAR a,a3,a6:integer;

Begin read (A)

a3:=a*a*a; a6=sqr(a3);

Writeln(A) ; writeln(a3,a6); writeln(a6,a3,A)

EnD)

E) PROGRAM PRTAB

VAR a,a3,a6:integer;

Begin read (A)

a3:=a*a*a; a6=sqr(a3);

Writeln(A) ; writeln(a3,a6); writeln(a6,a3,A)

EnD.;

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$142 В какой конструкции больший приоритет записи на языке Паскаль строковой матрицы:

A) [село, город, степь]

B) [-46, n]

C) [‘a’,’g’,’z’]

D) [1.4, 4.8, 2.0]

E) 2,3,4

{Правильный ответ}=A

{Сложность}=3

{Тема}=4

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$143 Что выведет данный фрагмент

PROGRAM PAR ( INPUT, OUTPUT);

VAR C, D,P: INTEGER;

Function Q( X,Y: INTEGER): integer;

BEGIN

Q: = X+Y ;

END;

BEGIN

C: = 2; D: = 0; P:=Q(C,D) ; WRITELN(P); END)

A) 2

B) 0

C) 5

D) 10

E) 11

{Правильный ответ}=B

{Сложность}=3

{Тема}=5

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$144 Описание строковых переменных:

A) String

B) Record

C) Array

D) While

E) integer

{Правильный ответ}=A

{Сложность}=3

{Тема}=5

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$145 Описание Массивов

A) String

B) Record

C) Array

D) While

E) Var

{Правильный ответ}=C

{Сложность}=3

{Тема}=4

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$146 Укажите описание записей?

A) String

B) Record

C) Array

D) While

E) Var

{Правильный ответ}=B

{Сложность}=3

{Тема}=7

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$147 Чему равен результат TRUNC (5,61)

A) 5

B) 61

C) 6

D) -5

E) 10

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$148 Чему равен результат? TRUNC (-5,61)

A) 5

B) 61

C) 6

D) -5

E) 11

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$149 Чему равен результат ROUND (17,96)

A) 17

B) 96

C) 18

D) –18

E) 12

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Федоренко Ю. Алгоритмы и программы на Turbo Pascal.Учебный курс.-СПб:Питер,2001.

$$$150 s:=0; i:=1;

repeat s:=s+1/i; i:=i+1 until i>=1; После выполнения оператора найти значение переменной s

A) 1.0

B) 0

C) -1

D) 2

E) 3

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$151 program ABA;

var a, b: integer;

begin read(a,b,a) ; writeln(a,b,a) end. 1, 2, 3 После ввода этих чисел каким будет результат этой программы

A) 1 2 3

B) 2 3 2

C) 3 2 1

D) 3 2 3

E) 3 3 3

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$152 program P;

var x: integer;

begin x:=2; writeln(‘x+1‘) end.

Какие результаты выводит данная программа?

A) x+1

B) 2

C) 3

D) 0

E) 1

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$153 program AK;

const d:=5;

begin d:=sgr(d)

writeln(‘d**2=’;d) end

В данной программе в каком фрагменте есть ошибки?

A) 3, 4

B) 2, 4

C) 1, 3, 4

D) 1, 2, 3

E) 2,3,6

{Правильный ответ}=E

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$154 После выполнения оператора найти значение переменной S.

s:=0; n:=1;

for i:=2 to n do s:=s+1/i

A) 0.0

B) 0.5

C) 1.0

D) 0.1

E) 2.8

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$155 Вычислить и найти значение выражение

0 div 11+36 div 13-4 mod 11

A) 4

B) 2

C) –2

D) –1

E) -3

{Правильный ответ}=E

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$156 Что получите в результате выполнения следующей программы.

PROGRAM PR5;

VAR P,Q:INTEGER;

BEGIN

READ (P,Q,P); WRITELN (‘P+Q=’, P+Q, ‘P =’, P);

END)

За первоначальное значение 16,17, 26

A) 43 16

B) P+Q=43 P=26

C) 33 16

D) P+Q=33 P=17

E) P+Q=43 P=16

{Правильный ответ}=B

{Сложность}=3

{Тема}=5

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$157 С использованием условного оператора найти значение функции.

  1. A) IF X<0 THEN Y:=5*SQR(X) ELSE IF X>=0

AND X<6 THEN Y:=X-35 ELSE Y:=7,1-7

B) IF (X<0) THEN Y:=5*SQR(X)+6 ELSE IF (X>=0)

AND (X<6) THEN Y:=SQR(X)-35 ELSE Y:=7.1-7

C) IF X<0 THEN Y:=5*SQR(X)+6 ELSE IF (X>0)

AND (X<6) THEN Y:=SQR(X)-35 ELSE Y:=7.1x-7.

D) IF (X<0) THEN Y:=5*SQR(X)+6 ELSE IF (X>=0)

AND (X<6) THEN Y:=SQR(X)-35 ELSE Y:=7.1-7

E) IF X<0 THEN Y:=5*SQR(X)+6 ELSE IF (X>=0)

AND (X<6) THEN Y:=SQR(X)-35; ELSE Y:=7.1*X-7

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$158 После выполнения оператора найти значение переменной D.

D:=0; I:=1;

WHILE I<25 DO

I:=I+2;

D:=D+1/(2*I+1);

A) 0.02

B) 1/47

C) 1/51

D) 1/49

E) 0.03

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$159 Какому типу цикла относится следующая запись

FOR <переменная>:=< начальное значение >TO{DOWNTO} <конечное значение> DO <оператор>

A) цикл с предусловием

B) цикл с постусловием

C) цикл до

D) цикл с параметрами

E) цикл пока

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$160 Укажите какому оператору относится следующая запись? <переменная>:= <выражение>;

A) оператор перехода

B) присваевания значения

C) условный оператор

D) оператор выбора

E) оператор цикла

{Правильный ответ}=B

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$161 Укажите запись к какому оператору относится следующий формат?

IF <логическое выражение> THEN <оператор> [ELSE <оператор>;]

A) оператор перехода

B) оператор присваевания

C) условный оператор

D) оператор выбора

E) оператор цикла

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$162 Укажите запись к какому оператору относится следующая запись

WHILE <логическое выражение> DO <оператор>

A) оператор перехода

B) оператор присваевания

C) оператор цикла с предусловием

D) оператор выбора

E) оператор цикла с параметром

{Правильный ответ}=C

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$163 Oператор CASE

A) оператор перехода

B) оператор присваевания

C) условный оператор

D) оператор выбора

E) оператор цикла

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$164 Укажите к какому оператору относится следующая запись

GOTO <метка>;

A) оператор перехода

B) оператор присваевания

C) оператор с предусловием

D) оператор выбора

E) оператор цикла

{Правильный ответ}=A

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

$$$165 Укажите результат

1) TRUNC (5.61) 2) TRUNC (-5.61)

A) 1) 5 и 2) - 6

B) 1) 6 и 2) - 5

C) 1) 6 и 2) -6

D) 1) 5 и 2) – 5

E) 1) 4 и 2) 6

{Правильный ответ}=D

{Сложность}=3

{Тема}=3

{Код специальности}=050109, 050111, 050601, 050602, 050702, 050703, 050704, 050705, 050729

{Учебник}=Зуев Е.А. Turbo Pascal Практическое программирование-М.:»Издательство ПРИОР»,1999.

Соседние файлы в папке Языки программирования