Membuat Perulangan

Hy Gaes. . sekarang kita akan belajar bagaimana cara membuat perulangan atau looping di delphi menggunakan Console Application

Ketikkan Scripnya sebagai Berikut..

program Project2;

  {$APPTYPE CONSOLE}

  uses
    SysUtils;

  Var
  i : integer;
  begin
   for I := 1 to 10 do
  begin
   writeln(i,'Yadika');
   writeln('Bangil');
   end;
   Readln;
  end.

Maka Hasilnya akan Sebagai berikut