Складання циклічних алгоритмів опрацювання величин

Додано: 15 квітня 2021
Предмет: Інформатика, 8 клас
Тест виконано: 14 разів
5 запитань
Запитання 1

var i, j: Integer; S: String;

Визначте, який рядок буде сформований у результаті виконання фрагмента програми:

  For i := 1 To 2 do begin

  S := S + IntToStr (i);

  For j := 1 To 3 do S:=S + 'A';

end;

Позначте одну правильну відповідь.

варіанти відповідей

1AAA2AAA

1A1A1A2A2A2A

1AA2AA3AA

1A2A3A

Запитання 2

Чому дорівнює Х після виконання циклу:

x := 1; While x<5 do x := x*2;

варіанти відповідей

2

4

16

8

Запитання 3

В яких операторах допущені помилки?

Позначте всі правильні відповіді.

варіанти відповідей

K := 81; Y := 1; For і := 1 to Sqrt(K) do Y := Y*2; 

Y := 0; For X := 0.1 to 0.9 do Y := Y+Sіn(X); 

K := 0; For і := 9 to 1 do K := K*2; 

K := 1; C := 0; For і := 1 to 64 do begin K := K+і; C:=2*і; end; 

Запитання 4

Який фрагмент коду прізвів до поданого на рисунку результату?

варіанти відповідей

For N := 2 to 9 do begin

    For K := 1 to 9 do begin

     ListBox1.Items.Add(IntToStr(N) + ' x ' + IntToStr(K)+ ' = '+ IntToStr(N*K));

     end;

    ListBox1.Items.Add('---------------');

end

For N := 1 to 9 do begin

    For K := 2 to 9 do begin

     ListBox1.Items.Add(IntToStr(N) + ' x ' + IntToStr(K)+ ' = '+ IntToStr(N*K));

     end;

    ListBox1.Items.Add('---------------');

end

For N := 9 to 2 do begin

    For K := 9 to 1 do begin

     ListBox1.Items.Add(IntToStr(N) + ' x ' + IntToStr(K)+ ' = '+ IntToStr(N*K));

     end;

    ListBox1.Items.Add('---------------');

end

Запитання 5

Чому дорівнює S після виконання фрагмента програми:

var і: Integer; A, S: Real;

begin S := 0; A := 0;

          For і := 1 to 5 do begin

                             A := A+0.2;

                             S := S+A end; 

варіанти відповідей

0

1

2

1.2

Створюйте онлайн-тести
для контролю знань і залучення учнів
до активної роботи у класі та вдома

Створити тест