9. Циклы while и repeat

Предыдущий раздел:

9.5. Вычисления с заданной точностью

Следующий раздел:

Задание 9: Циклы while и repeat

Контрольная работа №7

1. Сколько раз выполнится цикл

  x:=1;
  while x>0.1 do
    x:=x/2;

  x:=1;
  y:=1;
  while (x>10)or(y<-1) do
  begin
    x:=x*2;
    y:=y-1;
  end;

  i:=1;
  x:=0;
  while i<5 do
    x:=x*2;

2. Чему равны переменные x и y после выполнения операторов:

  x:=1;
  y:=0;
  while x<10 do
  begin
    x:=x+y;
    y:=y+1;
  end;

  x:=1;
  y:=2;
  for i:=1 to 3 do
    while x<i*3 do
    begin
      x:=x+y;
      y:=y+1;
    end;

3. Чему равны переменные A и B после выполнения операторов:

  A:=45;
  B:=18;
  while A<>B do
    if A>B then
      A:=A-B
    else
      B:=B-A;

4. При выполнении следующей программы пользователь ввел числа 1, 20, 17, 6, 10, 13. Какое число выведет программа:

  readln(x);
  m:=x;
  while x<>13 do
  begin
    readln(x);
    if x>m then
      m:=x;
  end;
  writeln(m);

Следующий раздел:

Задание 9: Циклы while и repeat

Предыдущий раздел:

9.5. Вычисления с заданной точностью

Добавить комментарий