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 While-Do
menghitung Luas Bangunan (Segitiga) menggunakan Bahasa Pemrograman PASCAL.
Check This Out!.
Contoh
Program PASCAL While-Do
Program
Luas_Segitiga_While_Do;
Uses crt;
Var
A,t:integer;
Ls:real;
Label
Ulang;
Clrscr;
Begin
Write(‘Masukkan Alas: ‘);Readln(a);
Write(‘Masukkan Tinggi: ‘);Readln(t);
While a or t
= 0 Do
Begin
Goto ulang;
Ls:= a * t / 2;
Write(‘Hasil Luas Segitiga: ‘,ls);
Readln;
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!.