При відповіді на питання тесту не передбачено використання компілятора мови програмування.
Всі обчислення проводяться усно або в зошиті.
Конструктор тестів
При відповіді на питання тесту не передбачено використання компілятора мови програмування.
Всі обчислення проводяться усно або в зошиті.
При відповіді на питання тесту не передбачено використання компілятора мови програмування.
Всі обчислення проводяться усно або в зошиті.
1
var i, j: Integer; S: String;
Визначте, який рядок буде сформований у результаті виконання фрагмента програми:
S := ''; For і:=1 To 2 do begin
j := 0.1;
While j<1 do begin j := j+0.3; S := S +IntToStr(j) +' ' end;
2
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;
3
Чому дорівнює Х після виконання циклу:
x := 1; While x<5 do x := x*2;
4
Визначте, які оператори реалізують обчислення f=10!.
Пояснення: (10! = 1*2*3*4*5*6*7*8*9*10)
5
В яких операторах допущені помилки?
6
Встановіть порядок розташування операторів у програмі для визначення кількості парних серед введених з клавіатури восьми довільних чисел.
k := 0;
if a mod 2=0 Then k := k+1;
For i := 1 to 8 do begin
a := StrToInt(InputBox('Ввести 8 чисел', IntToStr(i), '0'));
end;
Edit1.text := IntToStr(k);
7
Чому дорівнює 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;
8
Встановіть відповідність між списками компонента ListBox і операторами, виконання яких привело до такого результату

K := 0;
For A := 1 To 9 do
For B := 0 To 9 do
For C := 0 To 9 do
If A + B + C = A*B*C Then
begin
ListBox1.Items.Add(IntToStr(100*A+10*B+ C));
K := K + 1;
end;
ListBox1.Items.Add('K='+IntToStr (K));

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;

ListBox1.Items.Add('S='+IntToStr(S));

For A := 1 To 5 do
begin
S := '';
For B := 1 To 5 do
begin
S := S+ IntToStr (B);
ListBox1.Items.Add(S);
end;
end;
Врахуйте що після тесту, не відображається кількість частково правильних або частково неправильних відповідей в тих питаннях, в яких кілька правильних відповідей!!!
Рефлексія від 40 учнів
Сподобався:
Так: 31
Ні: 9
Зрозумілий:
Так: 29
Ні: 11
Потрібні роз'яснення:
Ні: 33
Так: 7