Відмітьте ознаки циклу Repeat…Untіl.
Скільки разів виконається цикл, якщо початкове значення Х=7?
Repeat X := X+1 untіl X>10;
Визначте, який оператор реалізує дію:
Збільшувати значення змінної А на 2 доти, доки А<20
Яке значення 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
Вкажіть еквівалентний оператор оператору Repeat X := X+1 untіl X>10;
Вкажіть еквівалентний оператор оператору
While N<1000 do begin
N := N+1;
S := S+1/N end;
Вкажіть еквівалентний оператор оператору
While N<1000 do begin
N := N+1;
S := S+N end;
Вкажіть еквівалентний оператор оператору
While N<1000 do begin
N := N+1;
S := S+N end;
Вкажіть еквівалентний оператор оператору
Repeat X:=X+1; S:=S+X untіl X>10;
Встановіть відповідність між оператором та його блок-схемою:
Whіle A<5 do A := A+1;
Встановіть відповідність між оператором та його блок-схемою:
If A < 5 Then A := A+1 Else A := A-1;
Встановіть відповідність між оператором та його блок-схемою:
Repeat A := A+1 Untіl A >= 5;
Встановіть відповідність між оператором та його блок-схемою:
If A < 5 Then A := A+1;
Створюйте онлайн-тести
для контролю знань і залучення учнів
до активної роботи у класі та вдома