Тест по теме "Циклы"
методическая разработка по информатике и икт (9, 10 класс)

Тест по теме «ЦИКЛЫ»

Вариант 1

1. Выберите значение выражения-условия в цикле While, которое позволяет продолжить выполнение тела цикла:

1. True;
2. False.

2. Выберите операторы, которые содержат ошибки:

1. Repeat until a;
2. Repeat until a>7;
3. Repeat until a<7;
4. Repeat until a:=7;.

3. Выберите из списка операторы, которые соответствуют приведенным:

      i:=2; while i<=7 do begin a:=a+i;  i:=i+2 end; ;

1. For i:=2 to 7 do a:=a+i;;
2. For i:=2 to 7 do begin a:=a+i;  i:=i+2; end;;
3. i:=2; repeat  a:=a+i;  i:=i+2 until i>7;;
4.  i:=2; repeat  a:=a+i;  i:=i+2 until i<=7;;
   4. Выберите из списка операторы циклов, у которых тело цикла не будет выполняться:

1. For i:=1 to1 do…;
2. i:=10; while i<=9 do begin… i:=i-1 end;
3. i:=10; repeat … i:=i-1 until i>9;
4. For i:=1 downto 10 do … .
   5. Выберите  значение, которое примет переменная s после выполнения приведенных операторов:

s:= 0;  for i:=3 downto 3 do s:=s+I;

1. 0;
2. 3;
3. 6;
4. невозможно определить.

     6. Приведена программа, составленная для вычисления значения выражения

     у=1- 1/3-1/5-1/7-…-1/(2n+1)

    Выберите пропущенную строку:

    Var n, i: integer; y: real;

    Begin

    Readln(n);  y:=1;

    i:=3;

    y:=y+  ________________

    Begin

    y:=y-1/i;

    i:=i+2;

    End;

    Writeln (y:6:3);

    End.

1. For i:=1 to n do;
2. While i<=n do;
3. While i<=2*n+1 do;
4. For i:=1 to 2*n+1 do.

      7. Выберите описание блок-схемы:

        нет

          да

        нет

        да

1. While Условие1  do begin k1; k2; if  Условие 2 then end;;
2. If  Условие1 then k1;  if  Условие 2 then k2;;
3. While Условие1  do begin k1; repeat k2 until  Условие 2; end;;
4. While Условие1  do begin k1; k2; repeat until  Условие 2; end;.

8. Выберите значение, которое примет переменная х после выполнения приведенных команд:

x:=5;

For y:=5 to 7 do

 If x>0 then x:=x-3 Else x:=x-2;

1. -3;
2. 2;
3. -1;
4. -4;

9. Приведенные программы решают одну и ту же задачу. Выберите пропущенную строку для второй программы:

Программа 1:

Var p, s,k: integer;

Begin

Readln(s); p:=0; k:=1;

While p

p:=p+k;  k:=k+1; end;

writeln(k-1);

end.

Программа 2:

var p, s,k: integer;

begin

readln(s); p:=0; k:=1;

repeat

p:=p+k; k:=k+1

_____________________

writeln(k-1); end.

1. Unti pp<=s;
2. Until s<=p;
3. Until s
4. Until p

Вариант 2

1. Выберите значение выражения-условия в цикле While, которое позволяет закончить выполнение тела цикла:

3. True;
4. False.
   2.  Выберите операторы, которые содержат ошибки:

1. For a:=1 to 10 do;
2. For a:=10 to 1do;
3. For a:=1 to 1 do;
4. For a:=10 downto 1 do.
   3. Выберите из списка операторы, которые отвечают приведенным:  for i:=1 to 5 do a:=a+I;

1. i:=1; while i<=5 do a:=a+i;;
2. i:=1; while i<=5 do begin a:=a+i; i:=i+1; end;;
3. i:=1; repeat a:=a+i until  i>5;;
4. i:=1; repeat a:=a+i; i:=i+1 until i<=5;.

4. Выберите из списка операторы циклов, у которых тело цикла будет выполняться 5 раз:

1. i:=2; while i<=10 do begin … i:=i+2; end;;
2. i:=2; repeat … i:=i+2 until i>10;
3. for i:=1 to5 do…;
4. i:=1; while i<=5 do i:=i+1;.

5. Выберите значение, которое примет переменная после выполнения приведенных операторов:

     s:=0; for i:=1to 2 do s:=s+i;

1. 0;
2. 1;
3. 2;
4. 3;

6. Приведена программа, составленная для вычисления значения выражения

y=1/2+3/4+5/6+…+(2m-1)/ (2m).

Выберите пропущенную строку:

Var m, i: integer; y: real;

Begin

Readln (m); y:=0;

For i:=1 tom do

y:=y+___________________

Writeln (y:6:3);

End.

1. 2m-1/2m;
2. (2*m-1);;
3. (2*i-1)/(2*i);;
4. (2*i-1)/2*I;.

7. Выберите описание блок-схемы:

        нет

        да

        нет

1. i:=1; if i<=n then begin while условие then K1; K2 i:=i+шаг; end;;
2. i:=1; while i<=n do begin while условие do K1; K2; i:=i+шаг; end;;
3. i:=1; if i<=n then if условие then K1else K2; i:=i+шаг;;
4. i:=1; while i<=n do begin if условие then K1; K2 i:=i+шаг; end;.
   

8. Выберите значение,  которое примет переменная y после выполнения приведенных команд:

y:=0;  j:=5;

For i:=3 downto 1 do

Begin

y:=y+j; j:=j-2;

End;

1. 9;  b) 8;  c) 3;  d)1.
   

9. Приведенные программы решают одну и ту же задачу. Выберите пропущенную строку для второй программы:

Программа 1:

Var i, n: integer;

r: real;

Begin

Readln (n);

r:=1;

For i:=1 ton do

if  i mod 2 <>0 then r:=r*i;

writeln (r);

end.

Программа 2:

Var i, n: integer;

r: real;

Begin

Readln (n);

r:=1;

i:=1;

repeat

r:=r* i;

___________________

Until i>n;

Writeln (r);

end.

1. i:=i+1;
2. if  i mod 2 <> 0 then;
3. i:=i+2;
4. if  i mod 2 =2  then.

Ключи к заданиям: