Избыточность языковых средств, или тавтология в циклах? - Turbo Pascal

Формулировка задачи:

Как я понимаю, while и repeat → until нацелены на качество исполняемого до тех пор, пока не достигнется нужное условие, а for – на количестве неких повторяющихся действий. Но ведь тогда по сути, for можно осуществить в любом while:

program _for_;
var 
a : integer;
begin
for  a:=10 to 100 do
begin
    writeln(a);
    end;
readln(a);
end.

program _while_;
var 
a : integer;
begin
a:=10;
while  a<>100 do
begin
    a:=a+1;
    writeln(a);
    end;
readln(a);
end.

Или repeat_until

program _repeat_until_;
var 
a : integer;
begin
a:=10;
repeat  
    begin
    a:=a+1;
    writeln(a);
    end;
until a=100;
readln(a);
end.

Решение задачи: «Избыточность языковых средств, или тавтология в циклах?»

textual
                            Листинг программы 
                        

                            var
  b: Byte; w: Word;
begin
  for b:=0 to $FF do ;
  for w:=0 to $FFFF do ;
end.
                        

Оцени полезность:

15 голосов , оценка 4 из 5

Похожие ответы