Начала программирования на языке Паскаль

Итоговый тест по главе "Начала программирования". За 25 минут необходимо ответить на 25 вопросов.

Вопрос 17

В условном операторе и после then, и после else нельзя использовать:

Варианты ответов

• оператор вывода
• составной оператор
• несколько операторов
• условный оператор

Вопрос 18

Определите значение переменной с после выполнения следующего фрагмента
программы:
а:=100;
b:=30;
а:=а-b*3;
if a>b then c:=b-a else c:=a-b;

Варианты ответов

• 20
• 70
• -20
• 180

Вопрос 19

Условный оператор
if a mod 2=0 then write ('Да') else write ('Нет')
позволяет определить, является ли число а:

Варианты ответов

• целым
• двузначным
• чётным
• простым

Вопрос 20

Какого оператора цикла не существует в языке Паскаль?

Варианты ответов

• for
• while
• repeat...until
• loop

Вопрос 21

Цикл в фрагменте программы
р:=20;
repeat
р:=р*0.1
until p<0.1;
будет исполнен:

Варианты ответов

• 0 раз
• 1 раз
• 2 раза
• 3 раза

Вопрос 22

Цикл в фрагменте программы
а:=1;
b:=1;
while a+b<10 do
begin
a:=a+1;
b:=b+2
end;
выполнится:

Варианты ответов

• 0 раз
• 2 раза
• 3 раза
• бесконечно

Вопрос 23

Определите значения переменных s и i после выполнения фрагмента программы:
s:=0; i:=3;
while i>0 do
begin
s:=s+i;
i:=i-1;
end;

Варианты ответов

• s = 0, i = -1
• s = 6, i = 0
• s = 15, i = 5
• s = 15, i = 0

Вопрос 24

Выберите фрагмент программы, в котором ищется произведение 1*2*3*4*5

Варианты ответов

• p:=0; i:=1; while i<=5 do i:=i+1; p:=p*i;
• p:=1; i:=1; while i<6 do i:=i+1; p:=p*i;
• р:=1; i:=1; while i<6 do begin p:=p*i; i:=i+1 end;
• p:=1; i:=1; while i>5 do begin p:=p*i; i:=i+1 end;

Вопрос 25

В данном фрагменте программы 
s:=0;
for i:=1 to 10 do
s:=s+2*i;
вычисляется:

 

Варианты ответов

• сумма целых чисел от 1 до 10
• сумма чётных чисел от 1 до 10
• удвоенная сумма целых чисел от 1 до 10
• сумма первых десяти натуральных чётных чисел