Membuat Program Pangkat dengan mudah di Pascal, untuk membuat program pangkat di pascal caranya memang agak berbeda dengan operasi aritmatika pada umumnya. Untuk program pangkat menggunakan tipe data function, dan berbeda dengan aritmatika yang biasanya menggunakan variabel (var). Langsung saja berikut adalah contoh kode Membuat Program Pangkat dengan mudah di Pascal.
uses wincrt;
var a,b:integer;
hasil:real;
function pangkat(x:integer):real;
begin
hasil:=exp(x*ln(a));
pangkat:=hasil;
end;
begin
write('masukan angka = ');read(a);
write('masukan pangkat = ');read(b);
write('hasil dari ',a ,' pangkat ',b,' adalah ',pangkat(b):0:0);
end.
Langsung saja dicoba di program pascal anda. Disini saya menggunakan TPW 1.5. Jika anda menggunakan TP 7.0 ganti tulisan uses wincrt dengan uses crt. Saya rasa anda sudah mengetahuinya tapi alangkah beiknya lagi saya mengingatkan.
Terima kasiihh.
nb: hargai karya orang dengan, like, follow, coment, and share
Tidak ada komentar:
Posting Komentar
W A R N I N G !!!
=Pembaca yang Baik selalu Meninggalkan Komentar=
~ Berkomentarlah secara baik dan sopan maka admin akan merespon
~ JANGAN ANONIM
~ Komentar Sesuai dengan Topik Pembicaraan
~ Tidak Menyertakan Link Aktif
~ Dilarang Promosi dalam Bentuk Apapun !