Skip to main content

Posts

Showing posts from December, 2021

Mencari Hasil Pemangkatan menggunakan Looping Pada Pascal

Mencari Hasil Pemangkatan menggunakan Looping Pada Pascal - membuat perulangan dalam pascal banyak caranya, demikian juga untuk mendapatkan hasil pemangkatan suatu angka banyak cara yang bisa digunakan, termasuk menggunakan  kalkulator, software excell atau trik-trik lainnya.  Tulisan berikut merupakan dokumentasi, bagaimana mencari pangkat suatu angka menggunakan perulangan pada pemrograman pascal.  Pemangkatan dapat diartikan bahwa perkalian sebuah nilai sebanyak nilai pangkatnya. Untuk code pascal dalam mencari suatu pangkat menggunakan looping perulangan misalanya seperti berikut: program menghitung_pangkat; begin clrscr; write('Masukkan angka yang akan dipangkatkan: '); readln(angka1); write('Masukkan pangkat bilangan: ');readln(pangkat); hasil:=1; for i:=1 to pangkat do begin hasil:=hasil*angka1; end; writeln('Hasil dari ',angka1,'Pangkat ',pangkat,' adalah: ',hasil); end. Untuk menjalankan program pascal ini, saya menggunak