Menu Close

Menghitung Faktorial dengan Pascal

Terakhir diperbaharui pada

Script berikut akan melakukan perhitungan faktorial dari bilangan yang diinputkan, silahkan dicoba sendiri.

loading...
loading...

program Faktorial;
uses wincrt;
procedure faktorial (var fak, hasil : integer);
var
i:integer;
begin
hasil := 1;
for i := 2 to fak do
hasil := Hasil * i;
End;
Var
N,Hasil_fak:integer;
Begin
Write ('Nilai yang akan difaktorialkan = '); Readln (N);
Faktorial (N,Hasil_Fak); Writeln;
Writeln ('Hasil Faktorial = ',Hasil_fak);
End

.


DMCA.com Protection Status
Artikel ini dilidungi oleh DMCA Takedown Services & Website Content Protection. Dilarang Copy-Paste.
Yang mau ngajakin ngopi silahkan klik
Jangan lupa like kami di Facebook untuk update informasi terbaru:

Artikel ini berada dalam kategori Pascal

Artikel Terkait:

18 Komentar

  1. Pingback:cosmetic dental implants West Palm Beach Florida

  2. Pingback:zdporn.com

  3. Pingback:orospu cocuklari

  4. Pingback:Sepakbola Adalah Drama

  5. Pingback:criminal defense attorney

  6. Pingback:how to learn seo

  7. Pingback:site web

  8. Pingback:www.behance.net/Webdesign-Aerzte/

  9. Pingback:cpnsnews.com

  10. Pingback:DMPK Studies

  11. Pingback:how to make money with a iphone

  12. Pingback:Dokter obgyn terbaik di jakarta

  13. Pingback:Agen Bola

  14. Pingback:dronelifestyle.com/drone-buying-guide/ drones for sale

  15. Pingback:kokibola

  16. Pingback:Law Diyala

Mari Berdiskusi

Chat via WA
1
Hai,
Semoga harimu menyenangkan...
Powered by