Contoh For-Do dalam Pascal




Kali Ini Tips&Trick Blog mau share tentang Contoh Bahasa Pemrograman, dan Aplikasi yang saya gunakan dalah PASCAL. Oke, di bawah ini ada sebuah contoh program For-Do menghitung Luas Bangunan (Persegi Panjang)  menggunakan Bahasa Pemrograman PASCAL. Check This Out!.

Contoh Program PASCAL For-Do

Program For_Do;
Uses crt;
Var
          L,p,lpp,i:integer;

Begin
Clrscr;
          For a:= 1 to 10 do
          Begin
                   Write(‘Data ke- ‘,a);Readln;
                   Write(‘Masukkan Panjang: ‘);Readln(p);
                   Write(‘Masukkan Lebar: ‘);Readln(l);
                   Lpp:= p * l;
                   Write(‘-------------*’);
                   Readln;
                   Writeln(‘Hasil Luas Persegi Panjang: ‘,lpp);
Readln;
                   End;
End.

Gimana? Berhasil tidak? Misalkan tidak, coba di cek sesuai atau ngga sama tulisan yang di atas?. Dalam menulis Kodingan dibutuhkan kesabaran. Ingat!! Orang sukses pasti gagal dulu dan Jangan pernah berhenti mencoba dan mudah menyerah. Semoga Sukses!.





Recent Post

Anda Pengunjung ke-

Tips&Trick Blog. Diberdayakan oleh Blogger.