StartprogrammingusingObjectPascal:WhileLoop

while 순환문

While 순환문은 repeat 순환문과 유사하지만, 다음과 같은 점이 다릅니다.

1. while 에서는 순환문에 진입하기 전에 상태를 먼저 확인하지만 repeat는 순환문에 먼저 진입하고 상태를 확인합니다. 이는 repeat는 최소한 한 번은 구문을 실행하지만, while 순환문은 시작시 상태문에서 False를 되돌린다면 첫번째 순환의 진입을 막을 수 있다는 것을 의미합니다.
2. while 순환문은 순환문에서 실행할 구문들이 여러개 있을 경우 begin end가 필요하지만, repeat는 begin end가 필요하지 않으며, 블록(반복하는 구문들)은 repeat 키워드부터 시작해서 until 키워드에서 끝납니다.

예제:

var
    Num: Integer;
begin
    Write('Input a number: ');
    Readln(Num);

    while Num > 0 do
    begin
        Write('From inside loop: Input a number : ');
        Readln(Num);
    end;

    Write('Press enter key to close');
    Readln;
end.