Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Гос.экзамен по специальности ВТиП / Тесты по АиОП, мониторинг 2018 (150 вопросов с ответами)

.docx
Скачиваний:
22
Добавлен:
23.05.2018
Размер:
59.13 Кб
Скачать

1 Результат выполнения подпрограммы-функции в головную программу передается через:

A)* Имя функции

B) Массив

C) Параметры-переменные

D) Параметры-значения

E) Метки

2. Результат выполнения подпрограммы-процедуры в головную программу передается через:

A)* Параметры-переменные

B) Массив

C) Имя функции

D) Параметры-значения

E) Имя процедуры

3. Укажите верный заголовок подпрограммы-функции:

A)* Function F(a, b: real): real;

B) Function F(a, b: real);

C) Function F(a, b: real) real;

D) Function F(a, B): real;

E) FunctionF: real;

4. Укажите верный заголовок подпрограммы-процедуры:

A)* Procedure F(a, b: real; var s: real);

B) Procedure F(a, b: real; s: real):real;

C) Procedure F(a, b: real, var s: real);

D) ProsedureF(a, b: real; var s: real);

E) ProceduraF(a, b: real; var s: real);

5. В подпрограмме c заголовком Procedure Pr(A: real; n, m: integer; var P: real; var k: integer); результат в головнуюпрограммубудетпередаватьсячерез:

A)* Переменные P, k

B) Переменную Pr

C) Переменную P

D) Переменную k

E) Переменные n, m

6. В подпрограмме, имеющей заголовок FunctionSum (A: real; n, m: integer): real; результат в головную программу будет передаваться через:

A)* Переменную Sum

B) Переменную A

C) Переменную n

D) Переменную m

E) Переменные n, m

7. Найдите правильный вариант обращения к подпрограмме-функции:

A)* Y:=F(5, 3, A);

B) Y=F(5, 3, A);

C) Y:=F(n, m: integer; A: real);

D) F(5, 3, A);

E) F(5, 3, A):=Y;

8. Найдите правильный вариант обращения к подпрограмме-процедуре:

A)* F(5, 3, A, Sum);

B) F(n, m: real; A: integer; var Sum: real);

C) Y:=F(5, 3, A, Sum);

D) F(5; 3; A; Sum);

E) Y:=F(n, m: real; A: t; var Sum: real);

9. Найдите правильный фрагмент программы подсчета суммы элементов каждой строки матрицы А размером 3х5:

A)* For i:=1 to 3 do begin k[i]:=0; for j:=1 to 5 do k[i]:=k[i]+a[i, j]; end;

B) For j:=1 to 5 do begin k[i]:=0; for j:=1 to 3 do k[i]:=k[i]+a[i, j]; end;

C) For i:=1 to 3 do k[i]:=0; for j:=1 to 5 do k[i]:=k[i]+a[i, j];

D) k[j]:=0; for i:=1 to 3 do for j:=1 to 5 do k[j]:=k[j]+a[i, j]; end;

E) For i:=1 to 3 do begin k[i]:=0; for j:=1 to 5 do k[j]:=k[j]+a[i, j]; end;

10. Найдите правильный фрагмент программы подсчета суммы элементов матрицы А размером3х5:

A)* S:=0; for i:=1 to 3 do for j:=1 to 5 do S:=S+a[i, j];

B) For i:=1 to 3 do begin S:=0; for j:=1 to 5 do S:=S+a[i,j]; end;

C) For i:=1 to 3 do for j:=1 to 5 do S:=S+a[i, j];

D) S:=0; for i:=1 to 3 do for j:=1 to 5 do S:=S+1;

E) For i:= to 3 do S:=0; for j:=1 to 5 do S:=S+a[i, j];

11. Найдите правильный фрагмент программы накапливания произведения элементов матрицы А размером 4х4:

A)* P:=1; for i:=1 to 4 do for j:=1 to 4 do P:=P* a[i, j];

B) For i:=1 to 4 do for j:=1 to 4 do P:=P* a[i, j];

C) For i:=1 to 4 do begin P:=1; for j:=1 to 4 do P:=P+a[i, j]; end;

D) P:=0; for i:=1 to 4 do for j:=1 to 4 do P:=P* a[i, j];

E) For i:=1 to 4 do P:=0; for j:=1 to 4 do P:=P* a[i, j];

12. Найдите правильный фрагмент программы подсчета суммы элементов каждого столбца матрицы А размером 4х3:

A)* For j:=1 to 3 do begin k[j]:=0; for i:=1 to 4 do k[j]:=k[j]+a[i, j]; end;

B) For j:=1 to 4 do begin k[j]:=0; for i:=1 to 3 do k[j]:=k[j]+a[i, j];

C) For j:=1 to 3 do k[j]:=0; for i:=1 to 4 do k[j]:=k[j]+a[i, j];

D) k[i]:=0; for i:=1 to 4 do for j:=1 to 3 do k[j]:=k[j]+a[i, j];

E) For j:=1 to 3 do begin k[j]:=1; for i:=1 to 4 do k[j]:=k[j]+a[i, j]; end;

13. Найдите правильный фрагмент поиска минимального элемента главной диагонали матрицы D размером 5х5:

A)* min:=d[1,1]; for i:=2 to 5 do if d[i, i]<min then min:=d[i, i];

B) min:=0; for i:=2 to 5 do if d[i, i]<min then min:=d[i, i];

C) For i:=2 to 5 do if d[i, i]<min then min:=d[i, i];

D) min:=d[1,1]; for i:=2 to 5 do if d[i, i]>min then min:=d[i, i];

E) min=d[1,1]; for i:=2 to 5 do if d[i, i]<min then min=d[i, i];

14. Найдите правильный фрагмент поиска суммы элементов главной диагонали матрицы А размером 5х5:

A)* S:=0; for i:=1 to 5 do S:=S+a[i, i];

B) S:=1; for i:=1 to 5 do S:=S+a[i, i];

C) S:=0; for i:=1 to 5 do S:=S+1;

D) For i:=1 to 5 do S:=S+a[i, i];

E) S:=0; for i:=5 to 1 do S:=S+a[i, i];

15. Найдите правильный фрагмент поиска произведения элементов побочной диагонали матрицы B размером 4х4:

A)* P:=1; for i:=1 to 4 do P:=P* b[i, 5-i];

B) P:=0; for i:=1 to 4 do P:=P* b[i, 5-i];

C) P:=1; for i:=1 to 4 do P:=P* b[5-i];

D) P=0; for i:=1 to 4 do P:=P* b[i, i];

E) P:=1; for i:=1 to 4 do P:=P* b[i, i];

16. В результате выполнения фрагмента программы: a:=’оценка’; b:=pos(‘цен’, A); c:=pos(‘ока’, A);:

A)* b=2, c=0

B) a=3, c=1

C) b=5, c=0

D) b=’ока’, с=’окаоценка’

E) b=1, c=2

17. Укажите верное значение функции copy(‘abcde’, 2, 3):

A)* ‘bcd’

B) ‘cd’

C) 23

D) ‘bbb’

E) ‘abbbcde’

18. В результате выполнения фрагмента программы: S:=’монитор’ ; delete(S, 2, 3);

A)* S=’мтор’

B) S=’мотор’

C) S=0

D) S=’мнитор’

E) S=7

19. В результате выполнения фрагмента программы: h:=’27’; x:=’abcd’; insert(h, x, 2);

A)* h=’27’, x:=’a27bcd’;

B) h=’2abcd7’, x=’abcd’

C) h=’27’, x=’ab27cd’

D) h=x=’27abcd’

E) h=x=’27’

20. В результате выполнения фрагмента программы: y:=1; iflength(‘дом’)>3 theny:=0;

A)* y=1

B) y=0

C) y=3

D) y=10

E) будет выдано сообщение об ошибке

21. В результате выполнения фрагмента программы: x:=’12309354231’; y:=pos(‘23’, x); z:=pos(‘32‘, x);

A)* y=2, z=0

B) y=9, z=2

C) y=9, z=0

D) y=2, z=12

E) y=’2312309354231’ , z=0

22. Какой тип имеет функция pos(‘1.2’, x)?

A)* целый

B) вещественный

C) строковый

D) логический

E) символьный

23. В результате выполнения процедуры str(2/3: 6: 4, y);

A)* y=’0.6666’

B) y=0.6666

C) y=’0.666’

D) y=0.666

E) y=0

24. В результате выполнения фрагмента программы var a, x: integer; … val(‘236’,x, A);

A)* x=236, a=0

B) x=’236’, a=0

C) x=0, a=236

D) x=0, a=’236’

E) x=0, a=0

25. В результате выполнения фрагмента программы: vara, x: integer; ...x:=0; val(‘2.36’, x, A);

A)* x=0, a=2

B) x=2.36, a=0

C) x=’0’, a=2

D) x=2, a=23

E) x=’2’, a=23

26. Оператор while a[length(A)]=’ ‘ do delete(a, length(A), 1);

A)* удалит в строке а ведомые пробелы (пробелы после текста)

B) удалит в строке а ведущие пробелы (пробелы перед текстом)

C) вставит в строке а пробел после каждого слова

D) удалит в строке а все пробелы

E) оставит самый левый пробел

27. Оператор x:=x+’ ‘;

A)* добавит пробел в конце строки х

B) добавит пробел в начале строки х

C) добавит пробел после каждого слова строки х

D) удвоит числовое значение х

E) обнулит х

28. Пусть х-строка из слов, разделенных пробелами. Тогда функция copy(x, 1, pos(‘ ‘, x) возвращает;

A)* первое слово строки х с пробелом в конце

B) первое слово строки х без пробела в конце

C) первое слово строки х с пробелом в начале

D) строку х

E) символ пробел

29. В результате выполнения фрагмента программы var a, b: integer; c, d: real; … a:=1; b:=2; c:=3; d:=4.856; write(a, b, c, d: 5: 2); на экран монитора будет выведена строка:

A)* 12 3.0000000000E+00 4.86

B) 1 2 3E0 4.856

C) 1 2 3 4.86

D) 12 3.0 4.856

E) 12 3.0000000000E+00 4.856

30. В результате выполнения фрагмента программы: a:=’12’+’8’; b:=’10’; c:=a+b; write(a, b, C); на экран монитора будет выведена строка:

A)* 1281012810

B) 201030

C) 12+8+10

D) 128 10 138

E) 20 10 30

31. Согласно описания:VAR A:integer;A является ...

A)* переменной целого типа

B) переменной вещественного типа

C) переменной символьного типа

D) переменной логического типа

E) записью

32. Согласно описания:VAR A:char;A является ...

A)* переменной символьного типа

B) переменной целого типа

C) переменной вещественного типа

D) переменной логического типа

E) записью

33. Согласно описания:VAR A:boolean;A является ...

A)* переменной логического типа

B) переменной целого типа

C) переменной вещественного типа

D) переменной символьного типа

E) записью

34. В результате выполнения какого оператора на экране отобразится число 1.333 при х=1.3333333333 ?

A)* Write(x:5:3);

B) Write(x:5);

C) Write(x:3:2);

D) Write(x);

E) Write(x:1:333);

35. В результате выполнения какой последовательности операторов будет выведена информация: РЕЗУЛЬТАТ РАСЧЕТА y=5 x=10

A)* y:=5; x:=10; Writeln('РЕЗУЛЬТАТ РАСЧЕТА'); Writeln('y=',y,' x=',x);

B) y:=5;x:=10; Write('РЕЗУЛЬТАТ РАСЧЕТА');Write('y=',y,' x=',x);

C) y:=5; x:=10; writeln('РЕЗУЛЬТАТ РАСЧЕТА'); Writeln('y=',y); writeln('x=',x);

D) y:=5; x:=10; write('РЕЗУЛЬТАТ РАСЧЕТА');Writeln('y=',y,'x=',x);

E) write('РЕЗУЛЬТАТ РАСЧЕТА');Writeln('y=',5,'x=',10);

36. В результате выполнения какой последовательности операторов будет выведена следующая информация: Привет!!!

A)* Writeln('Привет!!!');

B) Write('Привет!!!');Writeln('Hello!');

C) Writeln('Привет!!!');Writeln('Hello!');

D) Write('Привет!!!');Writeln;Writeln('Hello!');

E) Write('Привет!!!');Write;Writeln('Hello!');¦

37. Оператор Case - это ...

A)* оператор выбора

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

C) оператор безусловного перехода

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

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

38. Оператор IF ... THEN ... ELSE ... - это ...

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

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

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

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

E) оператор условного перехода

39. Оператор Goto - это ...

A)* оператор безусловного перехода

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

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

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

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

40. Результатом какой операции будет число 5?

A)* 11 DIV 2

B) 4 DIV 20

C) 5 DIV 5

D) 1 DIV 5

E) 17 DIV 6

41. Результатом какой операции будет число 3?

A)* 13 MOD 5

B) 11 MOD 3

C) 12 MOD 3

D) 3 MOD2

E) 12 MOD4

42. Какой из ниже предложенных операторов для А типа Integer вызовет ошибку?

A)* A:=35/7;

B) A:=3;

C) A:=A* 5-1;

D) A:=A* A-50* A;

E) Writeln('Ответ:',A:3);

43. VarY:Real;A:Integer;Укажите недопустимый оператор.

A)* A:=Chr(Trunc(Y))

B) A:=Trunc(A/Y)

C) A:=A* Trunc(A/Y)

D) A:=SQR(A) div A

E) A:=5;

44. В каком случае верно записана на Паскале формула ?

A)* Sqr(Cos(X))+Sin(Sqr(X))

B) Cos(Sqr(X))+Sin(Sqr(X))

C) Sqr(Cos(X))+Sqr(Sin(X))

D) Cos(Sqr(X))+Sqr(Sin(X))

E) Cos(X^2)+ (Sin(X))^2

45. В результате выполнения операторов:A:=79;If (Adiv 5=15) and (a<=79) ThenWrite('++') ElseWrite('+');Write('$');на экран выведется ...

A)* ++ $

B) + $

C) +

D) + $

E) В этих операторах допущена ошибка; они не будут работать!

46. Какой из операторов верно описывает логическое выражение: 0<X<3 или X>7 ?

A)* (X>0) and (X<3) or (X>7)

B) (X>0) or (X<3) and (X>7)

C) (X>0) and (X<3) and (X>7)

D) (X>0) or (X<3) or (X>7)

E) (X>0) or not(X<3) or (X>7)

47. Какой из операторов верно описывает условие: X<0 или 2<X<4 или X>6 ?

A)* (X<0) or (X>2) and (X<4) or (X>6)

B) (X<0) and ((X>2) or (X<4)) and (X>6)

C) (X<0) and ((X>2) and (X<4)) and (X>6)

D) (X<0) or ((X>2) or (X<4)) or (X>6)

E) not(X<0) and ((X>2) and (X<4)) and (X>6)

48. В каком из операторов нет ошибки?

A)* Case K of 'a'..'z':Writeln('* ');Else Writeln('-');end;

B) Case K of '+','-','* ','/':Writeln('Опер-я'); 1..9:Writeln('Цифра');Else Writeln('Перем-ая'); end;

C) Case K of 0..20:M:=K;C:=K div 10; 30..40,50..61:C:=K mod 10; Else M:=K+SQR(K); end;

D) Case K of 5..15:K:=K+1; 25..35:K:=K/17+1; Else K:=K/3; end;

E) Case K of 5..15:K:=K+1;25..35:K:=K* 17.3+1;Else K:=K* 3.5; end;

49. Оператор WHILE ... DO ... - это ...

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

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

C) оператор цикла с заранее известным числом повторений

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

E) оператор вывода

50. Оператор REPEAT ... UNTIL ... - это оператор ...

A)* цикла с постусловием

B) цикла с заранее известным числом повторений

C) выбора

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

E) вывода

51. Оператор FOR ... TO ... DO ... - это оператор ...

A)* цикла с заранее известным числом повторений

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

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

D) условного перехода

E) вывода

52. Определить значение переменной S после выполнения следующих операторов: S:=0; I:=0;while I<3 dobegin I:=I+1; S:=S+I end;

A)* 6

B) 3

C) 10

D) 1

E) 0

53. Определить значение переменной S после выполнения следующих операторов:S:=0; I:=1;while I>1 dobegin S:=S+I; I:=I-1 end;

A)* 0

B) 1

C) 2

D) -1

E) в результате выполнения операторов произойдет зацикливание

54. Определить значение переменной S после выполнения операторов: S:=0; I:=3;Repeat S:=S+I; I:=I-1 Until I<=1;

A)* 5

B) 1

C) 2

D) 0

E) в результате выполнения операторов произойдет зацикливание

55. Какой фрагмент программы из ниже перечисленных находит значение y=cos x + cos 2x + cos 3x + ... + cos 30x

A)* y:=0;for i:=1 to 30 do y:=y+cos(i* x);

B) y:=0;for i:=1 to 30 do y:=y+i* cos(x);

C) y:=1;for i:=1 to 30 do y:=y+cos(i* x);

D) y:=0; i:=0; for i:=1 to 30 do begin i:=i+1;y:=y+cos(i* x) end;

E) нет правильного ответа

56. Какой фрагмент программы из ниже перечисленных находит значение y=n!

A)* y:=1; for i:=1 to n do y:=y* i;

B) y:=0; for i:=1 to n do y:=y* i;

C) y:=1; for i:=1 to n do y:=y-i;

D) y:=1; for i:=0 to n do y:=y* i;

E) нет правильного ответа

57. Какой фрагмент программы из ниже перечисленных вычисляет

A)* y:=1;for i:=1 to n do y:=y* x;

B) y:=1;for i:=1 to n do y:=y+exp(i* ln(x));

C) y:=1;for i:=1 to n do y:=y* exp(i* ln(x));

D) y:=1;for i:=1 to n do y:=y* exp(ln(x));

E) нет правильного ответа

58. В каком из предложенных вариантов правильно описан двумерный массив, состоящий из элементов вещественного типа:

A)* A:array[1..2,1..9] of real;

B) A:array[1..4,1..7] of integer;

C) A:array[1..5] of real;

D) A:array[1...3,1...5]of real;

E) нет правильного ответа

59. В каком из предложенных вариантов правильно описан одномерный массив, состоящий из элементов целого типа:

A)* A:array[1..6] of integer;

B) DIM A(4)

C) A:array[1..4,1..4] of integer;

D) A:array[1...7] of integer;

E) нет правильного ответа

60. Какой фрагмент программы из ниже перечисленных находит максимальный элемент одномерного массива A размерностью N элементов:

A)* m:=A[1]; for i:=2 to n do if A[i]>m then m:=A[i];

B) for i:=1 to n do begin m:=A[1]; if a[i]>m then m:=a[i] end;

C) m:=A[1];for i:=2 to n do if A[i]<m then m:=A[i];

D) m:=A[1];for i:=2 to n do if A[i]>m then m:=A[i] else m:=A[i-1];

E) нет правильного ответа

61. Какой фрагмент программы из ниже перечисленных находит минимальный элемент в одномерном массиве А размерностью n элементов:

A)* m:=a[1]; for i:=2 to n do if a[i]<m then m:=a[i];

B) m:=a[1]; for i:=1 to n do if a[i]>m then m:=a[i];

C) m:=a[1]; for i:=1 to n do if a[i]<m then m:=a[i] else m:=a[i-1];

D) for i:=2 to n do begin m:=a[1]; if a[i]<m then m:=a[i] end;

E) for i:=n downto 1 do begin m:=a[1];if a[i]<m then m:=a[i] end;

62. Какой фрагмент программы из ниже перечисленных находит сумму элементов одномерного массива A размерностью n элементов:

A)* s:=0; for i:=1 to n do s:=s+a[i];

B) s:=0;for i:=n downto 1 do s:=a[i];

C) s:=1;for i:=1 to n do s:=s+a[i];

D) s:=1;for i:=1 to n do s:=s* a[i];

E) s:=1;for i:=1 to n do s:=s* a[i];

63. Дан одномерный массив A размерностью n элементов. Какой фрагмент из ниже перечисленных находит значение y=a[1]-a[2]+a[3]-a[4]+ ... -a[n-1]+a[n] ?

A)* y:=0; k:= -1; for i:=1 to n do begin k:=k* (-1); y:=y+k* a[i] end;

B) y:=0; k:=1; for i:=1 to n do begin k:=k* (-1); y:=y+k* a[i] end;

C) y:=0; k:= -1; for i:=1 to n do begin y:=y+k* a[i]; k:=k* (-1) end;

D) y:=0; k:= 1;for i:=1 to n do y:=y+a[i]* k; k:=k* (-1);

E) y:=0; k:= -1; for i:=n diwnto 1 do begin y:=y+k* a[i]; k:=k* (-1) end;

64. Какой фрагмент из ниже перечисленных находит максимальный элемент матрицы A размером NxN ?

A)* m:=a[1,1]; for i:=1 to n do for j:=1 to n do if a[i,j]>m then m:=a[i,j];

B) m:=a[1,1]; for i:=1 to n do for j:=1 to n do if a[i,i]>m then m:=a[i,i];

C) m:=0; for i:=1 to n do for j:=1 to n do m:=m+a[i,j]; m:=m/(n* n);

D) for i:=1 to n do begin m:=a[i,1]; for j:=1 to n do if a[i,j]>m then m:=a[i,j] end;

E) m:=a[1,1]; for i:=n downto 1 do for j:=n downto 1 do if a[i,i]>m then m:=a[i,j];

65. Какой фрагмент из ниже перечисленных находит минимальный элемент матрицы A размером NxN?

A)* m:=a[1,1]; for i:=1 to n do for j:=1 to n do if a[i,j]<m then m:=a[i,j];

B) m:=0; for i:=1 to n do for j:=1 to n do if a[i,j]<a[i,j+1] then m:=a[i,j] else m:=a[i,j+1];

C) m:=a[1,1]; for i:=1 to n do for j:=1 to n do if a[i,i]<m then m:=a[i,j];

D) for i:=1 to n do begin m:=a[i,1]; for j:=1 to n do if a[i,j]<m then m:=a[i,j] end;

E) m:=0; E) for i:=n downto 1 do for j:=n to 1 do if a[i,j]<a[i,j+1] then m:=a[i,j] else m:=a[i,j+1];

66. Какой фрагмент из ниже перечисленных выводит на экран сумму элементов каждой строки матрицы A размером NxN?

A)* for i:=1 to n do begin s:=0; for j:=1 to n do s:=s+a[i,j]; writeln(s);end;

B) s:=0; for i:=1 to n do begin for j:=1 to n do s:=s+a[i,j]; writeln(s); end;

C) s:=0; for i:=1 to n do for j:=1 to n do s:=s+a[i,j]; writeln(s);

D) for i:=1 to n do begin s:=0; for j:=1 to n do s:=s+a[i,j]; end; writeln(s);

E) s:=0; for i:=n downto 1 do begin for j:=1 to n do s:=s+a[i,j]; writeln(s); end;

67. Какой фрагмент из ниже перечисленных меняет отрицательные элементы матрицы A размером NN на нули?

A)* for i:=1 to n do for j:=1 to n do if a[i,j]<0 then a[i,j]:=0;

B) for i:=1 to n do for j:=1 to n do if a[i,j]>0 then a[i,j-1]:=0;

C) for i:=1 to n do for j:=1 to n do if a[i,j]<0 then begin x:=i; y:=j end; a[x,y]:=0;

D) for i:=1 to n do for j:=1 to n do if a[i,j]>0 then a[i-1,j]:=0;

E) for i:=n downto 1 do for j:=1 to n do if a[i,j]>0 then a[i-1,j]:=0;

68. Именованная область внешней памяти, содержащая последовательность компонент одного типа, причем число компонент не оговаривается, называется

A)* Файлом

B) Массивом

C) Строкой

D) Записью

E) Множеством

69. Процедура, которая открывает новый файл для записи, при этом указатель файла устанавливается на его начало. Если уже имелся файл с этим именем, он уничтожается.

A)* Rewrite

B) Append

C) Close

D) Reset

E) Assign

70. Процедура, которая открывает существующий текстовый файл для его дополнения, при этом указатель файла устанавливается на конец файла

A)* Append

B) Close

C) Rewrite

D) Reset

E) Assign

71. Функция, которая возвращает значения TRUE, если достигнут конец файла f:

A)* Eof(f)

B) Eoln(f)

C) Seekeof(f)

D) Seekeoln(f)

E) Write(f)

72. Функция, которая возвращает значение TRUE, если достигнут конец строки в файле f (указатель находится сразу за последним элементом строки), и FALSE в противном случае:

A)* Eoln(f)

B) Seekeof(f)

C) Eof(f)

D) Seekeoln(f)

E) Write(f)

73. Процедура, которая записывает значение переменной z в открытый для записи файл, связанный с файловой переменной f

A)* Write(f,z)

B) Rewrite(f,z)

C) Read(f,z)

D) Reset(f,z)

E) Read(z,f)

74. Процедура, которая считывает значение компоненты файла f по указателю файла в переменную z

A)* Read(f,z)

B) Rewrite(f,z)

C) Write(f,z)

D) Reset(f,z)

E) Write(z,f)

75. Структура данных, состоящая из фиксированного числа компонент, которые называются полями и могут быть различного типа – это

A)* Запись

B) Массив

C) Строка

D) Файл

E) Множество

76. Какой фрагмент из ниже перечисленных выводит на экран монитора таблицу кубов чисел, изменяющихся от 1 до 10 с шагом 0,1:

A)* x:=1; repeat y:=x* x* x; writeln(x:5:1,y:10:3); x:=x+0.1; until x>10;

B) for x:=1 to 10 do begin y:=x* x* x; writeln(x:5:1,y:10:3); end;

C) for x:=1 to 10 step 0,1 do begin y:=x* x* x; writeln(x:5:1,y:10:3); end;

D) x:=1; while x<10 do begin y:=x* x* x; writeln(x:5:1,y:10:3); x:=x+0,1; end;

E) x:=1; for i:=1 to 10 do begin y:=x* x* x; writeln(x:5:1,y:10:3); x:=x+0,1; end;

77. В результатевыполненияфрагментапрограммы: y=1 ; a:=1; while a>0.01 do begin a:=a/10; y:=y+a; end;

A)* y=1.11

B) y=1.111

C) y=1.1111

D) y=1.1

E) y=10

78. В результате выполнения фрагмента программы: x:=10; whilex<10 dox:=x+1;

A)* x=10

B) x=11

C) x=12

D) x=1

E) x=100

79. В результате выполнения фрагмента программы: y:=5; repeaty:=y-1; untily<6;

A)* y=4

B) y=5

C) y=6

D) y=3

E) y=0

80. Процедура, которая закрывает ранее открытый файл:

A)* Close

B) Rewrite

C) Append

D) Reset

E) Assign

81. Пусть REC-запись, имеющаяполя nom, fio, addres, причем поле fio имеет вложенные поля im и fam. Найдите правильное обращение к полю fam данной записи:

A)* REC. fio. fam.

B) fam. fio. REC

C) REC. fam. fio.

D) nom. fio. im. fam.

E) REC. nom. fio. fam.

82. Назовите оператор, позволяющий обращаться к полям, не указывая каждый раз имя всей записи:

A)* With

B) Case

C) Goto

D) If

E) For

83. Процедура, которая служит для установления связи между файловой переменной и именем того файла, за действия с которым эта переменная будет отвечать:

A)* Assign

B) Close

C) Append

D) Rewrite

E) Reset

84. Процедура, которая служит для открытия существующего файла и считывания из него информации:

A)* Reset

B) Close

C) Append

D) Rewrite

E) Assign

85. Какойоператорправильновызываетпроцедуру PROCEDURE Kop(x:integer; var y:integer);

A)* Kop(4,A);

B) Kop(3.5,A);

C) Kop(3,7);

D) Kop(9;y);

E) n:=Kop(5,A);

86. Какой оператор правильно вызывает процедуру PROCEDURECt(x,y:char; varz:real);

A)* Ct('a','b',B);

B) Ct('a','b',3.5);

C) Ct(3,a,B);

D) Ct(a,b,c,D);

E) s:=Ct(a,b,’3.5’);

87. Согласно описания:VARA:Real;A является ...

A)* переменной вещественного типа

B) переменной целого типа

C) переменной символьного типа

D) переменной логического типа

E) записью

88. В результате выполнения какого оператора на экране отобразится число 1.234 при х=0.1234E1 ?

A)* Write(x:5:3);

B) Write(x:5);

C) Write(x:3:5);

D) Write(x);

E) Write(x:1:333);

89. Раздел описания меток начинается служебным словом …

A)* label

B) const

C) begin

D) var

E) program

90. Раздел описания переменных начинается служебным словом …

A)* var

B) const

C) begin

D) label

E) program

91. Какой группой операторов на экран выводятся все четные числа от 1 до 20?

A)* for i:=1 to 20 do if i mod 2 =0 then Write(i);

B) for i:=1 to 20 do write (i);

C) i:=2; Repeat i:=i+2; Write (i); Until i=20;

D) i:=2; Repeat i:=i+2;Write (i);Until not(i=20);

E) Правильного ответа нет

92. VAR A:boolean;Укажите недопустимый оператор.

A)* A:=Sqr(A)

B) If A Then

C) A:=notA

D) A:=2>3

E) все операторы недопустимы

93. Согла сно описания:VARA:String; A является ...

A)* строкой

B) переменной целого типа

C) переменной вещественного типа

D) переменной логического типа

E) переменной символьного типа

94. В каком случае верно записана на Паскале формула

A)* (Sqrt(Sqr(X)* X)-Cos(Sqr(X)))/(Ln(X+1)+1)

B) (Sqrt(Sqr(X)* X)-Cos(Sqr(X)))/Ln(X-1)+1

C) Sqrt(Sqr(X)* X)-Cos(Sqr(X))/(Ln(X-1)+1)

D) Sqrt(Sqr(X)* X)-Cos(Sqr(X)) / Ln(X-1)+1

E) все варианты верны.

95. В каком случае в записи идентификатора допущена ошибка?

A)* 5Abc

B) L123

C) Kl5m234dfsff323df

D) Isb

E) во всех перечисленных случаях

96. Для объединения нескольких операторов в один составной в языке Паскаль используются …

A)* операторные скобки begin end;

B) круглые скобки ( );

C) квадратные скобки [ ];

D) фигурные скобки { };

E) все перечисленные способы.

97. Для создания комментариев в языке Паскаль используются …

A)* фигурные скобки { };

B) круглые скобки ( );

C) квадратные скобки [ ];

D) операторные скобки beginend;

E) все перечисленные способы.

98. Процедура, которая открывает уже существующий файл для чтения или изменения, при этом указатель файла устанавливается на его начало.

A)* Reset

B) Append

C) Close

D) Rewrite

E) Assign

99. С помощью какой функции можно найти и вернуть в основную программу сумму, вычисляемую по формуле

A)* function sum(n:integer):integer; var i:integer; begin begin sum:=0; for i:=1 to n do sum:=sum+i+5; end;

B) function sum(n:integer):integer; vari,sum:integer; begin sum:=0; for i:=1 to n do sum:=sum+i+5; end;

C) function sum(n:integer):integer; vari,s:integer; begin s:=0; for i:=1 to n do s:=s+i+5; end;

D) function sum(n:integer):integer; var i:integer; s:real; begin s:=0; for i:=1 to n do s:=s+i+5; sum:=s; end;

E) function sum(n:integer):real; vari,s:integer; begin s:=0; for i:=1 to n do s:=s+i+5; end;

100. С помощью какой функции можно найти и вернуть в основную программу произведение, вычисляемой по формуле

A)* procedure pr(n:integer; var p:integer); var i:integer; begin p:=1; for i:=1 to n do p:=p* (i+2); end;

B) procedurepr(var n:integer; p:integer); var i:integer; begin p:=1; for i:=1 to n do p:=p* (i+2); end;

C) procedure pr(var n:integer; p:integer):integer; var i:integer; begin p:=1; for i:=1 to n do p:=p* (i+2); end;

D) procedure pr( n:integer; var p:integer):integer; var i:integer; begin p:=1 for i:=1 to n do p:=p* (i+2); end;

E) procedure pr(var n:integer; p:integer); vari,p:integer; begin p:=1; for i:=1 to n do p:=p* (i+2); end;

101. Какие из терминов означают процесс перевода программ, написанных на языке программирования высокого уровня, в машинные коды: A)* компиляция B) интерпретация

C) архивация

D) манипуляция

E) визуализация

102.Целочисленный тип в Паскале описывается служебным словом: a)* integer b) real C) сhar

D) Boolean

E) var

103.Какой объем памяти ПК занимает массив А, описанный как varA: array [1…100] ofinteger: A)* 100 байт B) 200 байт

C) 300 байт D) 400 байт

E) 500 байт

104. Результат выполнения операции 5 mod2: A)2.5

B) * 1 C) 2

D) 5

E) 6

105. Результат выполнения функции sqr(4): A) 2

B) 4 C) 8 D) 16

E) 32

106. Даны множества A=[1,2,3] и В=[1..5]. Какое из высказываний для них справедливо: A) A=B B)* AB

C) AB

D) А<>B

E) A<B

107. Типизированные файлы описываются служебным словом:

A) file B). text

C) record D)* file of тип

E) ARRAY

108. Оператор ввода в Паскале имеет обозначение:

A)* read

B) write

C) input

D) reset

E) output

109. Каких функций не существует в Паскале:

A) cos(x)

B) sin(x)

C)* tg(x)

D) нет верного ответа

E) arct(x)

110. Найдитеошибку:

A)var c: char; begin c:=chr(100); end;

B) var c: char; begin c:=chr(200); end;

C)* var c: char; begin c:=chr(300); end;

D) var c: char; begin c:=chr(255); end;

E) var c: char; begin c:=chr(220); end;

111.Язык программирования Паскаль был создан:

A) Б. Паскалем B) К. Дж. Дейтом C)* Н. Виртом

D) К.Моучли

E) Тьюринг

112.Какой из видов языков программирования не нуждается в трансляторе:

A)* языки машинных команд

B) языки класса автокод-ассемблер

C) языки высокого уровня

D) языки манипулирования данными

E) языки базы данных

113. Какой объем памяти ПК занимает массив В, описанный как VarВ: array [1…10] ofreal: A) 10 байт B) 30 байт

C) 80 байт D)* 60 байт

E) 90 байт

114. Результат выполнения операции 5 div2: A) 2.5 B) 1 C)* 2

D) 5

E) 6

115. Результат выполнения функции sqrt (4): A)* 2

B) 4 C) 8 D) 16

E) 32

116. Найдитеошибки: A)* A : set of integer; B) A : set of char;

C) A : set of 1..100;

D) нет верного ответа

E) A: setof 2..1000;

117. Текстовые файлы описываются служебным словом:

A)file B)* text C) file of тип

D) unit

E) file of integer

118. Оператор вывода в Паскале имеет обозначение:

A) read

B)* write

C) output

D) reset

E) input

119. В каком из разделов программы описываются числа, имеющие громоздкую запись:

A)* const

B)var

C) type

D) label

E) char

120. Заголовок модуля начинается словом:

A) INTERFACE

B)* UNIT

C) IMPLEMENTATION

D) USES

E) Var

121. В качестве базового типа множества не могут использоваться: A)* вещественный тип B) интервальный тип C) логический тип

D) нет верного ответа

E) символьный тип

122. Какое действие выполняет следующая последовательность операторов:fori: = 1 to 100 do if i IN A then k:=k+1;

A) ввод элементов множества A

B) вывод элементов множества A в алфавитном порядке

C)* нахождение количества элементов множества А

D) нахождение произведения элементов множества А E) нахождение суммы элементов множества А

123. В качестве базового типа множества не могут использоваться: A)* целочисленный тип B) интервальный тип C) логический тип

D) нет верного ответа

E) символьный тип

124. В каком из языков программирования высокого уровня трансляция реализуется методом интерпретации:

A) Паскаль

B)* Бейсик

C) С

D) Фортран

E) C++

125. Результат выполнения функции odd(3): A) false B)* true C) 0

D) 1

E) 3

126. Результат выполнения функции abs(-5):

A)* 5

B) 25

C) -25

D) 0

E) -5

127. В качестве базового типа множества не может использоваться: A)* вещественный тип B) интервальный тип C) логический тип

D) символьный тип

E) целый тип

128. Нетипизированные файлы описываются служебным словом: A) file B) text C) fileof тип

D)* procedure

E) file of ineteger

129. Какая из последовательностей символов не может служить идентификатором переменной:

A) х1

B)* 1х

C) time

D) AAA

E) y1

130. Какой раздел программы необходим для применения оператора безусловного перехода goto:

A) var

B) type

C)* label

D) const

E) char

131. Интерфейсная часть модуля начинается со слова:

A)* INTERFACE

B) UNIT

C) IMPLEMENTATION

D) USES

E) VAR

132. Комбинированный тип описывается:

A) в разделе переменных

B)* в разделе типов

C) в разделе констант

D) в разделе переменных

E) в разделе описания

133. Расставьте языки программирования высокого уровня в порядке их возникновения:

A)* Бейсик Фортран Паскаль С++

B) Паскаль Фортран Бейсик С++

C) С++ Фортран Бейсик Паскаль

D) Фортран Бейсик Паскаль С++

E) нет верного ответа

134. В Турбо-Паскале компиляция программы осуществляется по нажатию клавиши:

A) F1

B) F5

C) F7

D)* F9

E) F10

135. Символьный тип в Паскале имеет область значений состоящую из:

A)64 символов

B) 128 символов

C)* 256 символов

D)512 символов

E) 1024 символов

136. Результат выполнения функции round(4.8):

A)* 5

B) 4

C) 0

D) 48

E) 50

137. Процедура ASSIGN (f, имя файла) применяется для:

A)* связывания файловой переменной с именем файла B) открытия файла для чтения C) открытия файла для записи

D) закрытия файла

E) создания файла

138. Результат выполнения функции ord(c) не может принимать значение:

A) 244

B) 128

C)* 302

D)255

E) 204

139. В каком разделе программы описываются переменные:

A) type

B)* var

C) label

D) const

E) char

140. Исполняемая часть модуля начинается со слова:

A)INTERFACE

B) UNIT

C)* IMPLEMENTATION

D) USES

E) VAR

141. Комбинированный тип описывается служебным словом:

A)* record

B) array

C) set of

D) type

E) const

142. Какой из языков программирования высокого уровня предназначен для разработки системных и прикладных программ:

A) Паскаль

B)* С

C) Бейсик

D) Фортран

E) C++

143. В Турбо-Паскале запуск программы осуществляется по нажатию комбинации клавиш:

A)Alt-F5