Тесты по теме "Алгоритмизация" (Циклы. Массивы.) 9 класс
материал для подготовки к егэ (гиа) по информатике и икт (9 класс) по теме

Вариант №1

Вариант №2

А1.Определите значение целочисленных переменных a, b и с после выполнения фрагмента программы

a:=50;

b:=17;

c:=(b+a) div b +a;

a:=(a div b)*b;

b:=c – a;

a:=13;

b:=40;

c:=(b+a) div a +b;

a:=(b div a)*a;

b:=c – b;

А2.Определите значение m и p после выполнения фрагмента программы

m:=5;

p:=5;

for i:=1 to 3 do

          if ((p

                                       else m:=i;

writeln (m);

writeln (p);

m:=5;

p:=5;

for i:=1 to 3 do

          if ((pi) then m:=i

                                       else p:=i;

writeln (m);

writeln (p);

B1.Определите значение S после выполнения фрагмента программы

S:=2;

For k:=1 to 5 do

   Begin

         S:=S+k+1;

         S:=S+ sqrt(S);

   End;

Writeln(S);

S:=16;

For k:=1 to 3 do

   Begin

         S:=S – sqrt(S);

         S:=S –k*(5–k) +1;

   End;

Writeln(S);

B2.Определите значение x после выполнения фрагмента программы

X:=6;  

Y:=1;

While (y<4 +x) do

Begin

     For k:=2 to y do

            If (x mod k=0) then

                                X:= x div k + y;

    y:=2*y;

end;

writeln (x);

X:=9;  

Y:=3;

While (y<4 +x) do

Begin

     For k:=2 to y do

            If (x mod k=0) then

                                X:= x div k + y;

    y:=2*y;

end;

writeln (x);

B3.Сколько чисел было напечатано? Если использовали значения переменной x: 235; 4444; 7077; 3341; 12121; 42; 1001.

Readln(x);

Y:=x;

Z:=10;

While (y>z) do

      Z:=10*z;

Z:=z div 100;

Y:=100*(y mod z) + x div z;

If (y>x) then writeln (x);

B3.Сколько чисел было напечатано? Если использовали значения переменной x: 235; 6542, 4444; 7707; 3341; 12121; 1001.

Readln(x);

Y:=x;

Z:=10;

While (y>z) do

      Z:=10*z;

Z:=z div 10;

Y:=100*(y mod z) + x div z;

If (y>x) then writeln (x);

Вариант №1

Вариант №2

А1.Определите значение целочисленных переменных a, b и с после выполнения фрагмента программы

a:=50;

b:=17;

c:=(b+a) div b +a;

a:=(a div b)*b;

b:=c – a;

a:=13;

b:=40;

c:=(b+a) div a +b;

a:=(b div a)*a;

b:=c – b;

А2.Определите значение m и p после выполнения фрагмента программы

m:=5;

p:=5;

for i:=1 to 3 do

          if ((p

                                       else m:=i;

writeln (m);

writeln (p);

m:=5;

p:=5;

for i:=1 to 3 do

          if ((pi) then m:=i

                                       else p:=i;

writeln (m);

writeln (p);

B1.Определите значение S после выполнения фрагмента программы

S:=2;

For k:=1 to 5 do

   Begin

         S:=S+k+1;

         S:=S+ sqrt(S);

   End;

Writeln(S);

S:=16;

For k:=1 to 3 do

   Begin

         S:=S – sqrt(S);

         S:=S –k*(5–k) +1;

   End;

Writeln(S);

B2.Определите значение x после выполнения фрагмента программы

X:=6;  

Y:=1;

While (y<4 +x) do

Begin

     For k:=2 to y do

            If (x mod k=0) then

                                X:= x div k + y;

    y:=2*y;

end;

writeln (x);

X:=9;  

Y:=3;

While (y<4 +x) do

Begin

     For k:=2 to y do

            If (x mod k=0) then

                                X:= x div k + y;

    y:=2*y;

end;

writeln (x);

B3.Сколько чисел было напечатано? Если использовали значения переменной x: 235; 4444; 7077; 3341; 12121; 42; 1001.

Readln(x);

Y:=x;

Z:=10;

While (y>z) do

      Z:=10*z;

Z:=z div 100;

Y:=100*(y mod z) + x div z;

If (y>x) then writeln (x);

B3.Сколько чисел было напечатано? Если использовали значения переменной x: 235; 6542, 4444; 7707; 3341; 12121; 1001.

Readln(x);

Y:=x;

Z:=10;

While (y>z) do

      Z:=10*z;

Z:=z div 10;

Y:=100*(y mod z) + x div z;

If (y>x) then writeln (x);