TURBO PASCAL:Учебное пособие. Терёхин В.В. - 53 стр.

UptoLike

Составители: 

53
end;
end;
Writeln(' S= ', S: 6: 4);
end.
17.2 Цикл типа While
Этот цикл используется, если известно условие прекра-
щения цикла, но неизвестно количество итераций.
While <выражение типа Boolean> do <оператор>;
В данном случае <выражение типа Воо1еап> - это ус-
ловие продолжения цикла (пока условие - истинно, тело
цикла выполняется).
Если условие принимает с самого начала значение false,
то тело цикла вообще не выполняется.
Конструкция цикла предусмотрена на случай того, что
телом является только один оператор, который непосредствен-
но следует за структурой While... do, а для включения в тело
цикла нескольких операторов необходимо объединить их в
один составной.
Примеры:
1)
While x < у do х; = х - 1 ;
2)
while (a < m) or (b < n) do
begin
a : = a - t ; b : = b - z ;
end;
При организации цикла While может возникнуть ситуа-
ция "зацикливания". Чтобы этого не произошло, по крайней
мере, один из повторяемых в теле цикла операторов должен
     end;
  end;
  Writeln(' S= ', S: 6: 4);
end.

      17.2 Цикл типа While
      Этот цикл используется, если известно условие прекра-
щения цикла, но неизвестно количество итераций.

      While <выражение типа Boolean> do <оператор>;

       В данном случае <выражение типа Воо1еап> - это ус-
ловие продолжения цикла (пока условие - истинно, тело
цикла выполняется).
       Если условие принимает с самого начала значение false,
то тело цикла вообще не выполняется.
       Конструкция цикла предусмотрена на случай того, что
телом является только один оператор, который непосредствен-
но следует за структурой While... do, а для включения в тело
цикла нескольких операторов необходимо объединить их в
один составной.
       Примеры:

      1)
While x < у do х; = х - 1 ;

      2)
while (a < m) or (b < n) do
  begin
     a:= a - t;b:= b - z;
  end;

       При организации цикла While может возникнуть ситуа-
ция "зацикливания". Чтобы этого не произошло, по крайней
мере, один из повторяемых в теле цикла операторов должен
                                                           53