Ekspresi | Belajar HTML dan PHP | Sunda | Kontak | Gmail | Uang Adsense
Kuliah Sistem Informasi,
Jurnal Ilmiah Sistem Informasi
STMIK JABAR
LP3I Tasikmalaya
STAI Al-Falah
Belajar Pemrograman PHP, MySQL, Framework CI, Domain, Hosting dan CMS Wordpress
Bisnis Bitcoin | Daftar Isi | Tools Penting | PrivacyPolicy | Inggris Arab

Monday, March 17, 2014

Pembagian Dan Jumlah Desimal Dalam Pemrograman Pascal

pembagian A/B. Apabila hasil pembagian tidak bulat atau menyisakan beberapa angka di belakang koma, seperti 2/4 = 0,5. Maka baris ke 11 (tulisan writeln('A:B=', hasil:2:  1  );), angka satunya yang dilingkari bisa diubah-ubah. Jika angka satu yang dilingkari diganti jadi 0, maka 2/4 = 1, karena digenapkan. Jika angka satu yang dilingkari diganti jadi 2, maka 2/4 = 0,50.

Langkah selengkapnya sebagai berikut:
1. Masuk ke Dev-Pascal
2. Simpan dengan nama
Project: pBagi
Unit: Bagi

3. Ketik script berikut:
program Pembagian;
var
   a,b:integer;
   hasil: real;
begin
   write('Masukkan nilai A:'); read(a);
   writeln;
   write('Masukkan nilai B:'); read(b);
   hasil:=a/b;
   writeln;
   writeln('A:B=', hasil:2:1);
   writeln;
readln;
readln;
end.
4. Simpan lagi (Ctrl+S)
5. Jalankan dengan menekan tombol F9 di keyboard

Berikut ini tampilan script di Dev-Pascal:



"Bitcoin and Forex are high risk business. We must join them smartly."
Belajar Bahasa Inggris dan Arab di WA dan FB Gratis!

No comments:

Post a Comment