StartprogrammingusingObjectPascal:WhileLoop

From 흡혈양파의 번역工房
Revision as of 05:56, 4 April 2013 by Onionmixer (talk | contribs) (스타일 수정 및 예제수정)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search

while 순환문

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

  1. while 에서는 순환문에 진입하기 전에 상태를 먼저 확인하지만 repeat는 순환문에 먼저 진입하고 상태를 확인합니다. 이는 repeat는 최소한 한 번은 구문을 실행하지만, while 순환문은 시작시 상태문에서 False를 되돌린다면 첫번째 순환의 진입을 막을 수 있다는 것을 의미합니다.
  2. while 순환문은 순환문에서 실행할 구문들이 여러개 있을 경우 begin end가 필요하지만, repeatbegin 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.