Показать, что любой оператор цикла while можно записать с помощью цикла repeat

@W0lf · Регистрация: 17.05.2014

Студворк — интернет-сервис помощи студентам

Показать, что любой оператор цикла с предусловием можно записать с помощью условного оператора и оператора цикла с постусловием.

@ildwine · 17.05.2014, 21:42

Pascal

//программа вывода массива 2 циклами и заполнения третьим
const
  n = 10;
var
  a : array [1..n] of integer;
  i : integer;
begin
  //заполним массив (цикл for)
  randomize;
  for i := 1 to n do
    a[i] := random(100);
  //выведем через цикл while
  i := 1;
  writeln('вывод с помощью цикла с предусловием:');
  while i <= 10 do
  begin
    write(a[i]:4);
    inc(i)
  end;
  writeln;
  //выведем с помощью repeat
  i := 1;
  writeln('вывод с помощью цикла с постусловием:');
  repeat
    write(a[i]:4);
    inc(i)
  until i > n
end.

@W0lf · 18.05.2014, 07:08 **[ТС]**

Можно не через массив, пожалуйста, мы ещё такое не проходили!

@W0lf 0 / 0 / 0 Регистрация: 17.05.2014 Сообщений: 4
		1
	Показать, что любой оператор цикла while можно записать с помощью цикла repeat 17.05.2014, 18:27. Показов 1883. Ответов 2 Метки нет (Все метки) Показать, что любой оператор цикла с предусловием можно записать с помощью условного оператора и оператора цикла с постусловием. 0

@W0lf 0 / 0 / 0 Регистрация: 17.05.2014 Сообщений: 4
	18.05.2014, 07:08 [ТС]	3
	Можно не через массив, пожалуйста, мы ещё такое не проходили! 0

Опции темы

Показать, что любой оператор цикла while можно записать с помощью цикла repeat

Решение