164. Вопрос: Определить, является ли число м чётным. Какое условие можно использовать в этой задаче?

M=2

*M mod 2=0

M/2=0

M div 2=0

M='чётное'

165. Вопрос: Определить, является ли число А положительным. Какое условие можно использовать в этой задаче?

А>=0

*A>0

A=0

A<0

A<>0

166. Вопрос: Определить, делится ли целое число Т на 5 без остатка. Какое условие можно использовать в этой задаче?

*T mod 5=0

T=5

T/5=0

T div 2=5

T mod 2=5

167. Вопрос: Входит ли число А в диапазон значений (4 ; 10]. Какое составное условие нужно поставить в этой задаче?

(A>=4) and (A<10)

(A<4) and (A>=10)

(A>4) or (A<=10)

*(A>4) and (A<=10)

not (A>4) and not (A<=10)

168. Вопрос: Входит ли число R в диапазон значений [-5 ; 0). Какое составное условие нужно поставить в этой задаче?

(R<=-5) and (R>0)

(R>-5) and (R<=0)

(R-5) and (R+0)

(A>4) or (A<=10)

*(R>=-5) and (R<0)

Тема. Циклы

169. Вопрос: Какие типы циклов существуют в языке Паскаль?

*For

Do…while

While

*Repeat…until

Loop

170. Вопрос: Цикл WHILE называется

*Циклом с предусловием

Циклом с параметром

Циклом с постусловием

Циклом с ветвлением

171. Вопрос: Цикл For называется:

Циклом с предусловием

*Циклом с параметром

Циклом с постусловием

Циклом с ветвлением

172. Вопрос: Цикл REPEAT называется

Циклом с предусловием

Циклом с параметром

*Циклом с постусловием

Циклом с ветвлением

173. Вопрос: Определите значение переменной S после выполнения операторов: i:=0; S:=0; While i<3 do begin i:=i+1; S:=S+i*i End;

0

3

11

*14

18

174. Вопрос: Сколько строк напечатает программа:

var k,l:integer;

begin

for k:=8 downto 1 do

writeln(‘Мне нравится Паскаль.’);

end.

*8

10

14

Верного ответа нет

175. Вопрос: Сколько строк напечатает программа:

var k,l:integer;

begin

for k:=1 to 10 do

writeln(‘Мне нравится Паскаль.’);

end.

8

*10

14

Верного ответа нет

176. Вопрос: Какое значение примет переменная S после выполнения фрагмента программы:

s:=0; for j:=1 to 5 do

begin

s:=s+2*j; end;

12

24

*30

32

44

177. Вопрос: Какое значение примет переменная S после выполнения фрагмента программы:

s:=0;

for j:=1 to 4 do

begin

s:=s*j; end;

*0

4

3

8

12

178. Вопрос: Какое значение примет переменная S после выполнения фрагмента программы:

s:=1;

for j:=1 to 4 do

begin

s:=s*j;

end;

0

14

*24

12

179. Вопрос: Чему будет равна переменная А после выполнения алгоритма.

A:=2;

for i:=2 to 4 do a:=a+1;

1

2

3

4

*5

180. Вопрос: Какой из операторов цикла имеет 2 вида записи

*For…

While…

Repeat…

Верного ответа нет

181. Вопрос: В каком из операторов допущена синтаксическая ошибка:

*For i=1 to 20 do p:=p+1;

While s<3 do s:=s-3;

Repeat k:=k+1 until k<7;

For I:=10 downto 5 do p:=p+1;

182. Вопрос: Тело цикла для вычисления значений функций f(x)=x4, на отрезке [-5,5] с шагом 0.1 будет иметь вид:

f:= x*x*x*x; x:=x+1;writeln (f,x);

f:=x4; x:=x+1;writeln (f,x);

f:= x*x*x*x; x=x+0.1;writeln (f,x);

*f:= x*x*x*x; x:=x+0.1; writeln (f,x);

183. Вопрос: Оператором цикла не является оператор

While…

For…

*Case…

Repeat…

Верного ответа нет

184. Вопрос: Укажите тип переменной для параметра цикла FOR:

*целочисленный тип

логический тип

натуральный тип

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

185. Вопрос: Что выведется на экран в результате выполнения фрагмента программы:

p:=1;

FOR k:=1 TO 5 DO

Begin

p:=p*k;

end;

write(‘ k=’, k, ’ p=’, p)

k=4 p=50

k=5 p=86

k=16 p=100

*k=5 p=120

186. Вопрос: В каком из операторов допущена смысловая ошибка:

For i:=1 to 20 do p:=p+1;

While s<3 do s:=s-3;

*Repeat k<1 until k:=k+1;

For I:=10 downto 5 do p:=p+1;

187. Вопрос: Какой из циклов не содержит логического условия:

While

*For

Repeat

Все содержат

188. Вопрос: В каком из операторов допущена синтаксическая ошибка:

For i:=1 to 20 do p:=p+1;

While s<3 do s:=s-3;

*Repit k:=k+1 until k<7;

For I:=10 downto 5 do p:=p+1;

189. Вопрос: В каком из операторов допущена синтаксическая ошибка:

For i:=1 to 20 do p:=p+1;

While s<3 do s:=s-3;

*Repeat k:=k+1 until k;

For I:=10 downto 5 do p:=p+1;

190. Вопрос: В каком из операторов допущена синтаксическая ошибка:

For i:=1 to 10 do p:=p+1;

While s<3 do s:=s-3;

Repeat k:=k+1 until k<7;

*For I:=10 down 5 do p:=p+1;

191. Вопрос: Чему будет равна переменная n после выполнения фрагмента программы:

N:=0; For i:=1 to 10 do inc(n);

0,5

3

7

*10

192. Вопрос: Чему будет равна переменная n после выполнения фрагмента программы:

N:=0; M:=0;

For i:=1 to 10 do inc(m);

*0

3

6

10

193. Вопрос: Чему будет равна переменная n после выполнения фрагмента программы:

N:=1; For i:=1 to 4 do n:=n*2;

0

2

*16

120

194. Вопрос: Чему будет равна переменная n после выполнения фрагмента программы:

N:=0; For i:=1 to 3 do n:=n*2;

*0

4

8

12

195. Вопрос: Сколько раз выполнится цикл

For i:=10 downto 5 do n:=n*2;

0

2

*6

10

196. Вопрос: Сколько раз выполнится цикл

N:=20;

While n>3 do n:=n/2;

1

2

*3

4

197. Вопрос: Сколько раз выполнится цикл

N:=10;

While n>0 do n:=n+1;

1

2

3

*Нет верного ответа

198. Вопрос: Сколько раз выполнится цикл

N:=10;

While n>0 do n:=n+1;

1

2

3

*бесконечное число раз

199. Вопрос: Чему будет равна переменная n после выполнения фрагмента программы:

N:=0; M:=0;

Repeat

N:=N+1; M:=M+1;

Until m<10;

0

4

8

*10

200. Вопрос: Чему будет равна переменная n после выполнения фрагмента программы:

N:=0;

M:=0;

Repeat

N:=N*M; M:=M+1;

Until m<5;

*0

2

7

14

201. Вопрос: Чему будет равна переменная n после выполнения фрагмента программы:

N:=0; M:=0;

Repeat

N:=M*M; M:=M+1;

Until m<3;

-2

3

*4

15

202. Вопрос: Сколько раз выполнится цикл

K:=1; T;=1;

Repeat

G:=k+t; K:=K+1; T:=T+1;

Until t<0

0

*1

2

3

203. Вопрос: Сколько раз выполнится цикл

K:=1; T;=1;

Repeat

G:=k+t; K:=K+1; T:=T+1;

Until t<3

0

1

*2

3

204. Вопрос: Сколько раз выполнится цикл

K:=5; T;=1;

Repeat

G:=k+t; K:=K-1; T:=T+1;

Until K>3

0

1

*2

3

205. Вопрос: Чему будет равна переменная n после выполнения фрагмента программы:

N:=0; For i:=1 to 5 do

For j:=1 to 5 do n:=n+1;

20

*25

100

135

206. Вопрос: Чему будет равна переменная m после выполнения фрагмента программы:

N:=25; M:=20;

For i:=1 to 5 do

For j:=1 to 5 do n:=n+1;

*20

25

100

135

207. Вопрос: Чему будет равна переменная j после выполнения фрагмента программы:

N:=0; For i:=1 to 5 do

For j:=1 to 5 do n:=n+1;

*5

10

25

100

208. Вопрос: Что делает эта программа?

For i:=1 to 100 do

Begin

If (I mod 2)=0 then writeln(i);

End;

Делит все числа от 1 до 100 на 2

Делит все числа от 1 до 100 на 2 и выводит их на экран

Выводит на экран модуль числа i

*Выводит на экран все четные числа от 1 до 100

209. Вопрос: Что делает эта программа?

S:=0; For i:=1 to 100 do

Begin

S:=S+I;

writeln(S);

End;

Выводит на экран все целые числа от 1 до 100

*Находит сумму чисел от 1 до 100 и выводит ее на экран

Все числа от 1 до 100 увеличивает на величину S

210. Вопрос: Что Вы увидите на экране после выполнения цикла?

For i:=1 to 100 do writeln(random(100));

Все целые числа в диапазоне от 1 до 100

Все четные числа в диапазоне от 1 до 100

*100 случайных целых чисел в диапазоне [0;100)

211. Вопрос: Что Вы увидите на экране после выполнения цикла?

For i:=1 to 100 do write(random(100)-random(100));

Все целые числа в диапазоне от 1 до 100

100 случайных целых чисел в диапазоне [0;100)

*100 случайных целых чисел в диапазоне [-100; 100]

Тема. Одномерные массивы

212. Вопрос:Массив - это:

*поименованный набор фиксированного числа однотипных данных;

ограниченная апострофами последовательность любых символов;

совокупность разнородных данных, описываемых и обрабатываемых как единое целое

набор переменных, начинающихся с одной и той же буквы

213. Вопрос: Что такое индекс в одномерном массиве?

*порядковый номер элемента массива

наибольший размер элемента массива

размерность массива

имя массива

214. Вопрос: Какие значения примут элементы массива A[3] и A[4] после выполнения последовательности операторов:

A[3] := 5; A[4] := 6; A[3]:=A[4]; A[4]:=A[3]?

*A[3] = 6; A[4] = 6

A[3] = 6; A[4] = 5

A[3] = 5; A[4] = 6

A[3] = 5; A]4] = 5

215. Вопрос: Какие значения примут элементы массива A[3] и A[4] после выполнения последовательности операторов:

A[3] := 2; A[4] := 3; B:= A[3]; A[3]:=A[4]; A[4] := B

A[3] = 3;   A[4] = 3

A[3] = 3;   A[4] = 0

*A[3] = 3;   A[4] = 2

A[3] = 2;   A[4] = 3

216. Вопрос: Какие из перечисленных описаний массивов будут корректны в среде Turbo Pascal?

*Array[1..32760] of integer;

Array[1..40000] of integer;

*Array[1..1] of byte;

Array[10..1] of real;

217. Вопрос: Задан массив из 5 элементов. A[1]=1, A[2]=4, A[3]=7, A[4]=9, A[5]=-3. Чему будет равен элемент A[4] после выполнения фрагмента программы: for i:=1 to 5 do a[i]:=a[i]*2;

1

4

*18

24

-10

218. Вопрос: Задан массив из 5 элементов. A[1]=1, A[2]=4, A[3]=7, A[4]=9, A[5]=-3. Чему будет равен элемент A[4] после выполнения фрагмента программы: for i:=1 to 5 do a[i]:=a[i]-a[i+1];

*12

14

18

20

219. Вопрос: Задан массив из 5 элементов. A[1]=1, A[2]=4, A[3]=7, A[4]=9, A[5]=-3. Чему будет равен элемент A[2] после выполнения фрагмента программы: for i:=1 to 5 do a[i]:=a[i]+1;

12

*4

1

16

220. Вопрос: Задан массив из 4 элементов. A[1]=3, A[2]=5, A[3]=5, A[4]=8. Чему будет равен элемент A[1] после выполнения фрагмента программы:

for i:=1 to 5 do a[1]:=a[1]+1;

4

-4

1

*8