Tutorial Turbo Pascal - Perulangan FOR DO Dalam Pascal

Contoh Program Perulangan Dengan For Do pada Pascal

1. uses crt;
    var
    i:integer;
    begin
    clrscr;
    for i:=10 downto 1 do

    begin
    writeln('hitung mundur');
    end;
    readln;
    end.

Hasilnya :

2. uses crt;
    var
    x:integer;
    begin
    clrscr;
    for x:=1 to 5 do

    writeln ('Belajar Pascal');
    readln;
    end.

Hasilnya :

Itulah Contoh Perulangan FOR DO pada pascal Sekian dan Terimakasih Semoga Bermanfaat

Location:

Bona Pasogit Content Creator, Video Creator and Writer

Berbagi :

Anda mungkin menyukai postingan ini :

• 
  Pengenalan Bahasa Pemograman
• 
  Download Buku Teknik Pemograman Semester 1
• 
  DOWNLOAD BUKU PEMOGRAMAN DASAR DAN ALGORITMA KURIKULUM 2013
• 
  Cara Membuat Tulisan Berjalan Pada TurboPascal