Q&A

  • for 문 질문입니다
for i:=1 to 100 do
  begin
    
  end;
일반적이 위의 for문은 123456....100까지 +1씩 증가 하면커 돌는데
+5씩 증가 시키려면 어떻게 해야되눈지 답변부탁드립니다
이 게시물을
2  COMMENTS
  • Profile
    이추형 • 2004.08.17 18:52
    간단하게 생각한건데요

    procedure TForm1.Button1Click(Sender: TObject);
    var
      iLoop, iNum:Integer;
      sNum:String;
    begin
      for iNum := 1 to 100 do
      begin
        if (iNum mod 5) = 0 Then  //5의 배수이니까, 5로 나누어 나머지가 0인 값
        begin
          sNum := inttostr(iNum);
          ListBox1.Items.Add(sNum);
        end;
      end;
    end;


  • Profile
    전명재 • 2004.08.17 16:11
    그냥 while 문이나 repeat-until 문을 써 보시는게 ㅡ_ㅡ
    정신건강에 더 좋을 겁니다.
←First Page
401 402 403 404 405 406 407 408 409 410
Last Page→
한델 로그인 하기