StartprogrammingusingObjectPascal:ForLoop

From 흡혈양파의 번역工房
Jump to: navigation, search

for 순환문

이 예제와 같이, 카운터를 사용하여 정해진 횟수대로 순환하기 위한 구문을 실행할 수 있습니다.

var
    i: Integer;
    Count: Integer;
begin
    Write('How many times? ');
    Readln(Count);
    for i:= 1 to Count do
        Writeln('Hello there');
    Write('Press enter key to close');
    Readln;
end.

for 순환문 변수에는 Integer, Byte 그리고 Char와 같은 서수 형식을 사용합니다. 이 변수를 루프 변수 또는 루프 카운터라고 부릅니다. 루프 카운터의 값은 임의의 숫자로 초기화할 수 있으며, 루프 카운터의 마지막 값 또한 결정할 수 있습니다. 예를 들어, 5부터 10까지 셀 필요가 있다면, 다음 처럼 할 수 있습니다.

for i:= 5 to 10 do

아래 수정된 예제와 같이, 순환문을 매번 돌 때마다 루프 카운터의 값을 표시할 수 있습니다.

var
    i: Integer;
    Count: Integer;
begin
    Write('How many times? ');
    Readln(Count);
    for i:= 1 to Count do
    begin
        Writeln('Cycle number: ', i);
        Writeln('Hello there');
    end;
    Write('Press enter key to close');
    Readln;
end.

참고로 이 시점에서 두 개의 구문을 반복하고자, 이들 구문을 하나의 구문으로 만들기 위해 begin . . end 키워드를 사용했습니다.