Конструктор тестів
1
Скільки разів виконається цикл, якщо початкове значення Х=7?
Repeat X := X+1 untіl X>10;
2
Скільки разів виконається цикл, якщо початкове значення Х=11?
Repeat X := X+1 untіl X>10;
3
Чому дорівнює 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;
4
Відмітьте ознаки циклу Repeat…Untіl.
5
Визначте, який оператор реалізує дію:
Збільшувати значення змінної А на 2 доти, доки А<20
6
Яке значення S буде виведено в текстове поле?
var N,d,S: Integer;
begin
N := 345; S := 0;
Repeat
d := N mod 10;
S := S+d;
N := N div 10;
Until N=0;
Edit2.Text := IntToStr(S);
end
7
Встановіть відповідність між еквівалентними операторами
Whіle Х <= 10 do
begin X := X+1;
S := S+X;
end;
Repeat X := X+1 untіl X>10;
Whіle Х <= 10 do X := X+1;
While N<1000 do begin
N := N+1;
S := S+1/N end;
Repeat N := N+1;
S := S+1/N
Untіl N >= 1000;
While N<1000 do begin
N := N+1;
S := S+N;
end;
Repeat N := N+1;
S := S+N
Untіl N >= 1000;
Repeat X:=X+1; S:=S+X untіl X>10;
Рефлексія від 43 учнів
Сподобався:
Так: 32
Ні: 11
Зрозумілий:
Так: 34
Ні: 9
Потрібні роз'яснення:
Ні: 35
Так: 8