Social Icons

Pages

Selasa, 11 Juni 2013

Membuat Program Pembagian di Pascal

Membuat Program Pembagian di Pascal, langsung saja tanpa basa-basi berikut codenya










program pembagiaan;
uses wincrt;
var a,b,h:real;
begin
     writeln('===PEMBAGIAN===');
     writeln('=================');
    
     write('Masukan Angka Pertama = ');read(a);
     write('Masukan Angka Kedua = ');read(b);

     h:=a/b;
                
     writeln('Angka Pertama : Angka Kedua = Hasil Pembagian');
     writeln(a, ' : ',b, ' = ' ,h);
     writeln('Hasil Operasi Pembagian Anda Adalah ',h:0:2);

end.


Nb: untk program pembagia dari integer yang biasanya digunakan pada operasi aritmatika pada umumnya dan pada operasi pembagian digunakan real karena hasil pembagian bisa berupa bilangan desimal.

Terima kasih atas kunjungan anda.

Tidak ada komentar:

Posting Komentar

 
 
Blogger Templates