Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Предоплата всего
Подписываем
1 вариант
1 Программа на языке Паскаль начинается с ключевого слова:B) program
2 Раздел описания переменных начинается с ключевого слова:D) var
3 В блок-схеме для обазначения блока вычислении используется: A) прямоугольник
4 В блок-схеме для обозначения блока ввода/вывода используется:B) параллелограмм
5 В блок-схеме эллипс означает:B) блок начало/конец
6 В блок-схеме параллелограмм означает: A) блок ввода/вывода
7 В блок-схеме прямоугольник означает:C) блок вычисления
8 В блок-схеме ромб означает:D) блок условии
9 Оператор ввода:B) Read
10 Оператор вывода:A) Write
11 Оператор конца программы:D) END
12 { } фигурные скобки используется для :A) написание комментариев
13 Оператор VAR используется для:B) объявления переменных
14 Оператор := используется для: E) оператор присваивания
15 Что происходит при выполнении оператора CLRSCR:A) очистка экрана
16 Для написания новой программы выполняется команда:C) FILE – NEW
17 Оператор выбора :E) CASE
18 Оператор безусловного перехода:C) GOTO
19 Оператор цикла с параметрами:B) FOR -TO-DO
20 Оператор Обьявления массивов:D) ARRAY
21 Оператор ввода компонентов массива:D) READ
22 Операторы FOR - TO – DO выполняют функцию:C) цикл с параметрами
23 Каким знаком обозначаются символьные переменныеA) ' ' (апостроф)
24 Операторы REPEAT – Until выполняют функцию:D) оператор цикла
25 Операторы IF – THEN – ELSE выполняют функцию:B) условного перехода
26 Оператор GOTO выполняет функцию: A) безусловного перехода
27 Порядок следования: B) основная программа
28 Можно ли писать оператор END в конце подпрограммы: A) обязательно
29 После выполнения оператора найти значение переменной.C) 0,2
30 К какому циклическому оператору относится While do:D) цикл –«пока»
31 К какому циклическому оператору относится For to do: C) цикл – “с параметрами ”
32 К какому циклическому оператору относится Repeat until: A) Цикл – “до”
33 If then else операторы: A) ветвление
34 на языке Паскаль пишется: D) sqr(x)
35 |x| на языке Паскаль пишется: C) abs(x)
36 ех на языке Паскаль пишется: A) exp(x)
37. OR, AND в операторе IF - THEN означает: A) OR – если выполняется одно из условий, то выполняется оператор после THEN; AND – если выполняются оба условия, то выполняется оператор после THEN
38 В конце подпрограммы обязательно пишется оператор: A) end
39 С использованием условного оператора, найти значение функции. . B) if(x>0)and (x<2) then y:=sqr(cos(x))
else y:=1-sin(sqr(x)).
40 С помощью оператора ... можно начертить прямую. B) LINE
41 С помощью оператора LINE можно начертить: A) прямоугольник
42 Что начертит оператор LINE: A) треугольник
43 С помощью оператора LINE можно начертить... A) отрезок
44 С помощью оператора CIRCLE можно начертить: B) окружность
45 Найдите строку в результате которого получится прямоугольник. B) line(1,15;100;150)
46 Найдите строку в результате которого получится окружность. D) circle (100;150;50
47 С помощью оператора CLOSEGRAPH можно … A) перейти в текстовый режим
48 Найдите правильную запись выражения на языке Паскаль:
E) (abs(x+1)-sqrt(x)-1)/2*x
49 Написать на языке Паскаль оператора присваивания
Y=X5+COS(X2+1) .. A) y:=sqr(sqr(x))*x+cos(sqr(x)+1)
50 Укажите действительное число Х: B) VAR X: real
51 Укажите правильное описание матрицы А(N,N) целых чисел:
C) A: array(1 . . N, 1 . . N) of integer
52 Даны переменные A=14, B=12,3 Укажите их правильное описание: D) VAR A: integer; B: real
53 Как описывается действительный тип: B) real
54 Как описывается целый тип: A) integer
55 Как описывается одномерный массив целых чисел: D) array[1 . . n] of integer
56 Как описывается символьный тип: A) char
57 Как описывается одномерный массив из действительных чисел: C) array[1 . . n] of real
58 c=a+b Если а,в – целый тип , тогда с какой тип: A) integer
59 b=3/a. Если а-целый тип (a3, a1). Тогда b какой тип? B) real
60 Как описывается двухмерный массив: B) var имя массива: array[1 .. n, 1 .. m] of тип
61 Как описывается одномерный массив из целых чисел: A) var a: array [1..n] of integer
62 b=a. Если а-целый тип, тогда b какой тип: B) integer
64 Если L-целый, S-постоянный, P-действительный тип, тогда как описывается это с помощью Var: D) const s=2
var L: integer; P: real;
65 Укажите правильный вариант условного операторa:
D) if условие then
Оператор
Else begin
Операторы
End;
66 Укажите правильный оператор цикла:
B) while условие do
Begin
Операторы
end;
67 Укажите правильный оператор цикла:
A) Repeat
Операторы
Until условие ;
68 Укажите оператор ввода переменной “a”: A) Read (a)
69 Укажите оператор вывода переменной “a”: B) Write (a)
70 Укажите правильное описание функции D) Sin(x)/Cos(x)
71 Модуль числа X: D) ABS(x)
72 Квадрат числа X: A) SQR(x)
73 Корень квадратный числа X: B) SQRT(x)
74 Остаток от деления числа X: C) MOD(x)
75 Укажите правильное описание извлечения квадратного корня: B) SQRT
76 Какой знак ставится в конце каждого оператора: B)
77 Возведение числа в квадрат: C) sqr
78 Целочисленное деление числа A на B: A) A div B
79 Остаток от деления числа A на B: B) A mod B
80 Если А=5 , Write (‘B – C =’,A) ; Тогда что выйдет на экран: C) B – C=5
81 j=10, A[10]=45 , Write (‘A(‘,j,’)=’,A[10]); Что выйдет на экран монитора: D) А(10)=45
82 Что выйдет на экран в результате выполнения программы:
Begin
A:=5; B:=19;
C:=A+B;
Write (C)
End
C) 24
83 Что выйдет на экран в результате выполнения программы:
Begin
A:=15; B:=30; C:=0;
Write (C)
C:=A+B;
End
C) 0
84 Что выйдет на экран в результате выполнения программы:
Begin
A:=5; B:=19; C:=3;
C:=C*A;
Write (C)
End
D) 15
85 Что выйдет на экран в результате выполнения программы:
Begin
S:=0;
For j:=1 to 5 do S=S+j;
Write (S);
End.
C) 15
86 Как записывается на Паскале
B) EXP(x)+2/(7*E) +sin(x)
87 Как записывается на Паскале . C) SQRT(a+b*x)-SQR(x)/10
88 Как записывается на Паскале. D) y:=sin(x)+(EXP(1+x)-5)/cos(x/2)
89 Как записывается на Паскале . C) y:=sin(x)/cos(x)+(6/x)*cos(x)
90 Выберите вариант при котором X будет четным: B) X:=2*a
91 Выберите вариант при котором X будет нечетным(а=1:N): A) X:=2*a-1
92 Выберите вариант при котором остаток от деления будет равен 0,если Х=51: A) Х MOD 3=0
93 Выберите вариант при котором X будет положительным: C) X:=ABS(x)
94 Какое условие верно для элементов главной диагонали матрицы A[n,n]={}: C) i=j
95 Какое условие верно для элементов побочной диагонали матрицы A[n,n]={}:
A) i+j=n+1
96 Какое условие верно для элементов матрицы расположенных выше главной диагонали A[n,n]={}: B) i<j
97 Какое условие верно для элементов матрицы расположенных ниже главной диагонали A[n,n]={}:
D) i>j
98 Укажите фрагмент программы для F=N!.
A)
F:=1;
For i:=1 to N do F:=F*i;
. . .
99 Укажите фрагмент программы для S=:
B)
S:=0;
For i:=1 to N do S:=S+i;
. . .
100 Укажите фрагмент программы для вывода чисел от 1 до 10:
C) For i:=1 to 10 do begin
K:=i;
WRITE( K );
end;
101 Укажите фрагмент программы для вывода четных чисел от 2 до 20:
B)
For i:=1 to 10 do begin
K:=2*i;
WRITE( K )
end;
. . .
102 Укажите фрагмент программы для вывода нечетных чисел от 1 до 21:
B) For i:=1 to 11 do begin
K:=2*i-1;
WRITE( K );
end;
. . .
103 Укажите фрагмент программы для вывода квадратов чисел от 1 до 10
A)
For i:=1 to 10 do begin
K:=SQR(i);
WRITE( K );
end;
. . .
104 Если a=2,25; b=0,001; c=12 Укажите результат оператора readln(a,b,C)
C) 2,25 Enter
0,001 Enter
12 Enter
105 Если a=2,25; b=0,001; c=12 Укажите результат оператора read(a,B) ; readln(C)
C) 2,25 0,001 Enter
12 Enter
106 Если a=2,25; b=0,001; c=12 Укажите результат операторов
readln(A) ; readln(B) ; readln(C)
B) 2,25 Enter
0,001 Enter
12 Enter
107 Укажите правильную запись на Паскале.
B) a+x*x-(a+b*x)/3
108 Укажите правильное решение 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.
109 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора
Write (X,Y); D) 7 15
110 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (X,’_,_’,Y);
C) 7_,_15
111 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (‘X=’,X);
B) X =7
112 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (X,’’:3,Z);
A) 7 11
113 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (‘X+Y=’,X+Y);
B) X+Y =22
114 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (Z,’- результат‘); A) 11- результат
115 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (‘end ‘);
C) end
116 Если X=7, Y=15, Z=11, R=450,08 Укажите результат работы оператора Write (R);
D) 4.5008E+2
117 Укажите результат 20 mod 7 + 5 div 4*2; D) 8
118 Укажите результат 48 mod (2+3) div . A) 0
119 Укажите результат ((24 mod 7+5) div 4)*2: A) 4
120 Укажите результат 16 mod (7+9) div 3*2; A) 0
121 Укажите результат Х : x div 5 = x mod 5; D) 12
122 Укажите результат Х: 20 div x = 20 mod x; C) 19
123 Укажите результат Х:x div 5 = 8; D) 42
124 Укажите результат Х:50 mod x = 7; C) 43
125 Каковы значения Х и У после выполнения: x:=15 div (8 mod 3);
y:=17 mod x*5-19 mod 6*2; A) x=7; y=13
126 Каковы значения Х и У после выполнения:x:=2*5 div 3 mod 2;
y:=2*5 div(3 mod 2);
x:=x*y; y:=y*y ;
D) x=10; y=100
127 После выполнения фрагмента программы , чему будет равно число Х
x:=5;
if x>=5 then x:=x*2 else if x<=10 then x:=-x;
x:=x*5
D) x=50
128 После выполнения фрагмента программы , X будет равно числу
x:=5;
if x>=5 then x:=x*2 else if x<=10 then x:=-x;
B) x=10
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
D) a=2; b=2
130 После выполнения фрагмента программы , будет равно числу Аи В?
a:=1; b:=2;
if a>b then a:=a+1 else a:=b
A) a= 2; b=2
131 После выполнения фрагмента программы , А и В будет равно числу
a:=12; b:=2;
if a<b then a:=a+10 else b=b*2
C) a=12; b=4
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
D) a=4; b=4
133 Как записывается на Паскале выражение
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))
134 Как записывается условный оператор для решения функции.
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;
135 Вычислите значение S.
S:=0; I:=1;
WHILE I<10 DO
Begin
S:=S+(2*I+1);
I:=I+2;
B) 55
136 Сколько раз выполнится тело цикла
N:=0;
FOR I:=1 TO 3*N+4 DO
N:=N+2; C) 4
137 Укажите правильный вариант записи.
B) Массив ARRAY [1 . . N] OF REAL
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;
139 Дана матрица A [12,12]. Найти максимальный элемент матрицы.
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];
140 Дана матрица A[12,12]. Присвоить нечетным столбцам отрицательные значения.
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];
141 Дано число а вывести числа а в следующем порядке
a
a3 a6
a6 a3 a
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)
142 В какой конструкции больший приоритет записи на языке Паскаль строковой матрицы: А [село, город, степь]
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)
B) 0
144 Описание строковых переменных: A) String
145 Описание Массивов: C) Array
146 Укажите описание записей? B) Record
148 Чему равен результат? TRUNC (-5,61)
D) -5
147 Чему равен результат TRUNC (5,61). A) 5
148 Чему равен результат? TRUNC (-5,61). D) -5
149 Чему равен результат ROUND (17,96). C) 18
150 s:=0; i:=1;
repeat s:=s+1/i; i:=i+1 until i>=1; После выполнения оператора найти значение переменной s
1.0
151 program ABA;
var a, b: integer;
begin read(a,b,a) ; writeln(a,b,a) end. 1, 2, 3 После ввода этих чисел каким будет
результат этой программы. D) 3 2 3
152 program P;
var x: integer;
begin x:=2; writeln(‘x+1‘) end.
Какие результаты выводит данная программа?
A) x+1
153 program AK;
const d:=5;
begin d:=sgr(d)
writeln(‘d**2=’;d) end
В данной программе в каком фрагменте есть ошибки?
E) 2,3,6
153 program AK;
const d:=5;
begin d:=sgr(d)
writeln(‘d**2=’;d) end
В данной программе в каком фрагменте есть ошибки?
E) 2,3,6
154 После выполнения оператора найти значение переменной S.
s:=0; n:=1;
for i:=2 to n do s:=s+1/i .А)0.0
155 Вычислить и найти значение выражение
0 div 11+36 div 13-4 mod 11. E) -3
156 Что получите в результате выполнения следующей программы.
PROGRAM PR5;
VAR P,Q:INTEGER;
BEGIN
READ (P,Q,P); WRITELN (‘P+Q=’, P+Q, ‘P =’, P);
END)
За первоначальное значение 16,17, 26
В). P+Q=43 P=26
157 С использованием условного оператора найти значение функции.
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.
158 После выполнения оператора найти значение переменной D.
D:=0; I:=1;
WHILE I<25 DO
I:=I+2;
D:=D+1/(2*I+1);
C) 1/51
158 После выполнения оператора найти значение переменной D.
D:=0; I:=1;
WHILE I<25 DO
I:=I+2;
D:=D+1/(2*I+1);
C) 1/51
160 Укажите какому оператору относится следующая запись? <переменная>:= <выражение>;
B) присваевания значения
161 Укажите запись к какому оператору относится следующий формат?
IF <логическое выражение> THEN <оператор> [ELSE <оператор>;]
C) условный оператор
162 Укажите запись к какому оператору относится следующая запись
WHILE <логическое выражение> DO <оператор>
В) оператор цикла с предусловием
163 Oператор CASE
D) оператор выбора
164 Укажите к какому оператору относится следующая запись
GOTO <метка>; A) оператор перехода
165 Укажите результат
TRUNC (5.61) 2) TRUNC (-5.61). D) 1) 5 и 2) – 5
166 Укажите результат
1. ROUND (17.96) 2. ROUND (-17.16)
C) 18 и -18
167 Найти правильное из следующих записей
1. А значение ( 0,3 ) промежутке не подлежит:
( A<= 0) OR (A>= 3)
1. A значение ( -2,0 ) промежутке подлежит:
( A>=-2 ) AND (A>=0)
A) 1
168 CASE выберите правильный вариант из следующих операторов
E) CASE l OF
1,3,5: WRITELN ("нечетный");
2,4,6: WRITELN ("четный");
END.
169 После выполнения оператора цикла найти значение переменной S
.. var S,i : integer; sim: char; lop : boolean;
s :=0; for i:=5 to 7 do s:=s+1;
s :=0; for i:=10 downto 6 do s :=s+1;
s := 0; for sim :=’A’ to ‘D’ do s :=s+1;
s :=0; for lop:=false to true do s:= s+1;
С) 1) 3 2) 5 3) 4 4) 2
170 Укажите оператор ввода переменной “b” : . A) Read (b)
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;
if ( a = b ) and p then p:= p+10.5
D) 2, 4 и 5
172 Какой из операторов удовлетворяет следующую запись
var x,y: integer; A) x:=3 ; y:=4
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;
D) k=5m+3
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);
D) 1 и 5
175 Укажите правильную запись, после выполнения оператора цикла
: var k: integer;
begin
k:=0; while k<=8 do
begin k:=k+2;
write (k:2);
end;
end.
C) 2 4 6 8 10
176 Укажите правильное решение после выполнения логического условия А и В:
A) A and B
177 x=0.1, y= - 0.2 укажите правильный результат
:var x,y,mm: real;
if x > y then mm:=y else mm := x;
writeln ( mm);end.
E) –0.2
178 Укажите правильный результат
:var n: integer;
begin n:=1000; writeln ( n div 10 ); end.
A) 100
179 Укажите правильный результат
:Var x: char;
begin x:=chr ( ord('9') + 1);
writeln (x); end.
A) 9
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.
C) 4 и 2
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
182 Укажите правильный результат
: var n : integer;
begin n:= 1000; writeln ( n mod 23 ); end;
E) 10.0
183 Найти неправильно записанное вещественное число
1,81 2. 6 0.56 4. 7,77
A) 1 и 4
184 Укажите правильный ответ следующего отрезка программы
: for k:=5 to 8 do
begin pm:=k*k; writeln ('pm=',pm); end;:
A) pm=25
pm=36.
pm=49.
pm=64.
185 Покажите оператор цикла. E) Repeat until
186 Какой из записей меток правильно. A) label 4,8,12
187 В каком месте объявляется постоянные
A) до объявления всех переменных программы
188 Как определяются формальные параметры процедуры
A) введенные в тело процедуры идентификаторы
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
190 Единица измерения информации
C) 1 байт
191 Укажите результат выполнения программы
var: x,y: integer;
begin y:=5; x:=0;
while x< 6 do
begin y:=y + x; x:= x + 2; end.
A) 5
192 Вычислить и найти значение выражения
SUCC (ROUND (5/2)-PRED(3))
C) 2