delphi编写一个程序实现用Showmessage输出12345678910这个字符串,用for或者While循环

解决方案 »

  1.   

    Showmessage('12345678910');?
    MessageBox(handle,'12345678910','提示',MB_ICONERROR + MB_OK);?for     i:=1     to     10   do   
        begin     
          Showmessage(inttostr(i));?
        end;   
      

  2.   

    没事吧,为什么还循环
    var
    i:integer;
    s:string;
    begin
    s := '12345678910';
    for i := 1 to Length(s) do
    begin
      ShowMessage(s[i];
    end;
    end;
      

  3.   

      var s:string;//放在过程的begin 之前
      for i:=1 to 10 do   
      begin   
         s := s + inttostr(i);
      end;  
      Showmessage(s)
      

  4.   

    呵呵,是初次接触吧,记得初学时,为了出个ShowMessage也是头疼的紧
      

  5.   

    for i:=1 to 100 do  //弹出100次
       showmessage('12345678910');
      

  6.   

    做习题吧,看一楼二楼答案均可,如果想了解delphi,随便找本书看看
      

  7.   

    如果想了解delphi,随便找本书看看
      

  8.   

    for i:=1 to 10 do   
      begin   
      Showmessage(inttostr(i));?
      end;  
      

  9.   

    我是来拿分的,你就showmessage(str)就行了
      

  10.   

    var
      I:Integer;
    begin
      I:=1;
      While I<10 do begin    //循环弹出10次
        I:=I+1;
        Showmessage('12345678910');
      end;
    end;