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

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

1. ROUND (17.96) 2. ROUND (-17.16)

A) 17 и -17

B) 17 и -18

C) 18 и -18

D) 18 и -17

E) 4 и 6

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

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

{Тема}=3

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

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

$$$167 Найти правильное из следующих записей

1. À значение ( 0,3 ) промежутке не подлежит:

( A<= 0) OR (A>= 3)

1. A значение ( -2,0 ) промежутке подлежит:

( A>=-2 ) AND (A>=0)

A) 1

B) 1 и 2

C) 2

D) 1 и -2

E) 1 3

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

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

{Тема}=3

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

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

$$$168 CASE выберите правильный вариант из следующих операторов

A) CASE l OF

1;3;5: WRITELN (‘нечетный’);

2;4;6: WRITELN (‘четный’);

END;

B) CASE l OF

1,3,5: WRITELN (‘нечетный’);

2;4;6: WRITELN (‘четный’);

END;

C) CASE l OF

1,3,5: WRITELN (‘нечетный’);

2,4,6: WRITELN (‘четный’);

END;.

D) CASE l OF

1,3,5: WRITELN ("нечетный");

2,4,6: WRITELN ("четный");

END;

E) CASE l OF

1,3,5: WRITELN ("нечетный");

2,4,6: WRITELN ("четный");

END.

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

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

{Тема}=3

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

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

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

.. var S,i : integer; sim: char; lop : boolean;

  1. s :=0; for i:=5 to 7 do s:=s+1;

  2. s :=0; for i:=10 downto 6 do s :=s+1;

  3. s := 0; for sim :=’A’ to ‘D’ do s :=s+1;

  4. s :=0; for lop:=false to true do s:= s+1;

A) 1) 6 2) 5 3) 4 4) 2

B) 1) 3 2) 4 3) 4 4) 1

C) 1) 3 2) 5 3) 4 4) 2

D) 1) 2 2) 5 3) 3 4) 1

E) 1) 4 2) 2 3) 4 4) 1

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

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

{Тема}=3

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

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

$$$170 Укажите оператор ввода переменной “b” : .

A) Read (b)

B) Write (b)

C) Input b

D) Print b

E) Label b

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

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

{Тема}=3

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

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

$$$171 Найти неправильные условные операторы

1. if a < b then a := a*a else b :=b * b;

2. if x and y then s:=s+1; else s := s - 1 ;

3. if k <> m then k := m;

4. if 5 then s := s+5;

  1. if ( a = b ) and p then p:= p+10.5

A) 3,4,5

B) 1,2 и 3

C) 4 и 5

D) 2, 4 и 5

E) 4,2 и 3

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

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

{Тема}=3

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

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

$$$172 Какой из операторов удовлетворяет следующую запись

var x,y: integer;

A) x:=3 ; y:=4

B) x:=’3’; y:=’4’

C) x:= not y

D) x:= y/2

E) x:=y/3

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

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

{Тема}=3

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

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

$$$173 Найдите правильный ответ следующего отрывка программы

k:= 53; case k mod 5 of

0: writeln (‘ k= 5m’);

1: writeln (‘k=5m+1’);

2: writeln (’k=5m+2);

3: writeln(‘k=5m+3’); end;

A) k=5m

B) k=5m+1

C) k=5m+2

D) k=5m+3

E) k=5m+4

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

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

{Тема}=1

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

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

$$$174 Укажите правильную запись

1.const a=2..30; b:=’b’; pi=3,14159;

2.type otrezok = (1..30);

3.type gorod = (moskwa;tomsk;omsk;baky);

4.type bukwy = (‘a’,’b’,’c’,’d’);

5.type zifra=(0,1,2,3,4,5,6,7,8,9);

A) 1 и 2

B) 1 и 3

C) 4 и 5

D) 1 и 5

E) 1 и 4

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

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

{Тема}=2

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

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

$$$175 Укажите правильную запись, после выполнения оператора цикла

: var k: integer;

begin

k:=0; while k<=8 do

begin k:=k+2;

write (k:2);

end;

end.

A) 10 8 6 4 2

B) 2 4 6 8

C) 2 4 6 8 10

D) 10 8 6 4 2

E) 10 5 4 8 2

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

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

{Тема}=3

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

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

$$$176 Укажите правильное решение после выполнения логического условия À и Â:

A) A and B

B) Not (A or B)

C) A or B

D) not (A or B not B)

E) A div B

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

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

{Тема}=3

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

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

$$$177 x=0.1, y= - 0.2 укажите правильный результат

:var x,y,mm: real;

if x > y then mm:=y else mm := x;

writeln ( mm);end.

A) 0.2

B) 0.1,-0.2

C) -0.1

D) 0.1

E) –0.2

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

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

{Тема}=3

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

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

$$$178 Укажите правильный результат

:var n: integer;

begin n:=1000; writeln ( n div 10 ); end.

A) 100

B) 10.00

C) 10

D) 0

E) 1000

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

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

{Тема}=3

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

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

$$$179 Укажите правильный результат

:Var x: char;

begin x:=chr ( ord('9') + 1);

writeln (x); end.

A) 9

B) ‘9’

C) 10

D) 4

E) 8

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

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

{Тема}=2

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

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

$$$180 Укажите правильный результат

:var s : string; mI,k,k1 : integer;

begin k1:=0; k:=0; s:= ‘bcbccckk’;

for mI:=1 to 8 do begin

if s[mI]=’c’ then k:=k+1;

if s[mI] =’b’ then k1:=k1+1; end;

writeln (k,’ ‘,k1); end.

A) 1 и 3

B) 2 и 2

C) 4 и 2

D) 10 и 8

E) 2 и 4

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

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

{Тема}=3

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

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

$$$181 Укажите правильный результат

:var x,y,z: real;

begin x:=2; y:= 4; z:=-0.1;

if ( x>=y) and (y>=z) then x:= 2*x else y:= abs(y);

writeln ('x=',x,'y=',y,'z=',z); end.

A) x=2, y=4, z=-0.1

B) x=2, y=8, z=-0.1

C) x=4, y=16, z=0.2

D) x=2, y=16, z=-0.4

E) х=5, у=6,z=7

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

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

{Тема}=3

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

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

$$$182 Укажите правильный результат

: var n : integer;

begin n:= 1000; writeln ( n mod 23 ); end;

A) 2

B) 11

C) 23,9

D) 100

E) 10.0

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

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

{Тема}=3

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

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

$$$183 Найти неправильно записанное вещественное число

1,81 2. 6 0.56 4. 7,77

A) 1 и 4

B) 1 и 2

C) 2 и 4

D) 2 и 4

E) 2 и 1

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

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

{Тема}=2

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

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

$$$184 Укажите правильный ответ следующего отрезка программы

: for k:=5 to 8 do

begin pm:=k*k; writeln ('pm=',pm); end;:

A) pm=25

pm=36.

pm=49.

pm=64.

B) pm=64

pm=49

pm=36

pm=25

C) pm=25

pm=64

pm=49

pm=100

D) pm=25,36,49,64

E) pm=64

pm=49

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

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

{Тема}=3

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

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

$$$185 Покажите оператор цикла

A) goto

B) case

C) read

D) whil .. do

E) Repeat until

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

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

{Тема}=3

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

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

$$$186 Какой из записей меток правильно

A) label 4,8,12

B) 4;8;12: label

C) label : 4,8,12

D) 0,14,17: label

E) 0,14,16: label

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

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

{Тема}=2

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

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

$$$187 В каком месте объявляется постоянные

A) до объявления всех переменных программы

B) после объявления переменных программы

C) в строке объявлении переменных процедуры функции

D) в части объявлении основной программы

E) после тела программы

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

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

{Тема}=2

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

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

$$$188 Как определяются формальные параметры процедуры

A) введенные в тело процедуры идентификаторы

B) процедура в части объявления операторов

C) переменные объявленные в части программы

D) постоянные в части программы

E) в конце программы

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

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

{Тема}=5

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

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

$$$189 Укажите правильную запись оператора присваивания

Если A,I,J,K : integer; X, Y, Z : real; B : boolean;

1. X := Y + sin ( sin(z));

2. A := ( X<Y ) or ( B and ( I<>K));

3. X := I + J - B;

4. I := I + K / J.

A) 1 и 3

B) 2 и 4

C) 1 и 2

D) 3 и 4

E) 4 и 1

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

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

{Тема}=3

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

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

$$$190 Единица измерения информации

A) бод

B) 1 бар

C) 1 байт

D) 1 литр

E) 1 бит

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

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

{Тема}=2

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

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

$$$191 Укажите результат выполнения программы

var: x,y: integer;

begin y:=5; x:=0;

while x< 6 do

begin y:=y + x; x:= x + 2; end.

A) 5

B) 6

C) 11

D) 9

E) 10

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

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

{Тема}=3

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

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

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

SUCC (ROUND (5/2)-PRED(3))

A) 0

B) 1

C) 2

D) -1

E) –2

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

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

{Тема}=3

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

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

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