PENULISAN RUMUS FAKTORIAL MENGGUNAKAN PROCEDURE & FUNCTION

program Project15; {$APPTYPE CONSOLE} uses   SysUtils; procedure faktorial(var fak, hasil:integer);     var       a:integer;     begin       hasil:=1;       for a := 2 to fak do       hasil:=hasil*a;     end;     var       z,b,c,d,nminr:integer;       f1,f2,f3:integer;       x:real; begin   writeln...

Read More

PENULISAN PROCEDURE & FUNCTION PADA FAKTORIAL

Faktorial dari bilangan asli n adalah hasil perkalian antara bilangan bulat positif yang kurang dari atau sama dengan n. Faktorial ditulis sebagai n! dan disebut n faktorial, tanda (!) disebut dengan notasi faktorial. program Project14; {$APPTYPE CONSOLE} uses   SysUtils; procedure faktorial(var fak, hasil:integer);     var       a:integer;     begin       hasil:=1;       for...

Read More

PENULISAN PROCEDURE & FUNCTION MODEL PROCEDURE BY REFERENCE

program Project13; {$APPTYPE CONSOLE} uses   SysUtils; var     X,Y,Z:integer;   procedure jumlah(var A,B,C:integer);     begin       C:= A+B;     end; begin   writeln ('NIM  : 114224008');   writeln ('NAMA : AZIZUN NURRACHMAN');   writeln ('=====================================');   writeln ('CONTOH PENULISAN PROCEDURE & FUNCTION');   writeln ('    MODEL...

Read More

PENULISAN PROCEDURE & FUNCTION MODEL PROCEDURE BY VALUE (VARIABEL GLOBAL)

program Project12; {$APPTYPE CONSOLE} uses   SysUtils; var     X,Y:integer;   procedure jumlah(A,B:integer) ;     var       C:integer;     begin       C:= A+B;       writeln('Hasil Penjumlahan = ',C);     end; begin   writeln ('NIM  : 114224008');   writeln ('NAMA : AZIZUN NURRACHMAN');   writeln ('=====================================');  ...

Read More

PENULISAN PROCEDURE & FUNCTION BENTUK SEDERHANA (STANDART)

program Project11; {$APPTYPE CONSOLE} uses   SysUtils; procedure jumlah;   var     A,B,C:integer;   begin     writeln ('NIM  : 114224008');     writeln ('NAMA : AZIZUN NURRACHMAN');     writeln ('=====================================');     writeln ('CONTOH PENULISAN PROCEDURE & FUNCTION');     writeln ('          BENTUK SEDERHANA    ...

Read More

MATRIKS MENGGUNAKAN GAUSS JORDAN MODEL

Contoh 1: program Project8; {$APPTYPE CONSOLE} uses   SysUtils; var   matrik:array[1..10,1..10] of integer;   x,y:integer; begin   writeln('NIM  : 114224008');   writeln('NAMA : AZIZUN NURRACHMAN);   writeln ('=============================');   writeln ('TAMPILAN MATRIKS GAUSS JORDAN');   writeln ('=============================');   writeln ('');   for x := 1 to 5 do   begin    ...

Read More

PENULISAN CODING ARRAY DUA DIMENSI PADA MATRIKS

Matriks dalam matematika merupakan kumpulan bilangan, simbol atau ekspresi berbentuk persegi panjang yang disusun menurut baris dan kolom. Bilangan-bilangan yang terdapat pada suatu matriks disebut dengan elemen atau disebut juga anggota dari suatu matriks. Contoh matriks dengan 2 baris dan 3 kolom yaitu sebagai berikut : Matriks banyak dimanfaatkan untuk menyelesaikan berbagai permasalahan matematika misalnya dalam menemukan solusi masalah persamaan...

Read More

PENULISAN CODING ARRAY SATU DIMENSI MENGGUNAKAN FUNGSI WHILE

Perulangan ini mirip dengan perulangan Repeat Until tetapi pengecekannya berada di awal sebelum melakukan proses yang berulang. Perulangan ini berjalan selama kondisi pengecekan bernilai true. Jika kondisi telah mempunyai nilai false maka perulangan tidak dilakukan lagi. Bentuk umum dari While Do adalah seperti berikut :            While kondisi do             Begin      ...

Read More

PENULISAN DASAR CODING FOR…

Perulangan dengan statement for adalah perulangan yang digunakan untuk melakukan suatu proses dalam sebuah blok program. Proses perulangan For – To – Do dimulai dengan nilai terkecil ke besar.        Perulangan ini berjalan dengan menggunakan suatu variabel counter yang akan bertambah secara otomatis ketika perintah yang diulang telah selesai dikerjakan.        Bentuk umum dari perulangan ini adalah :  ...

Read More

PENULISAN CODING IF…ELSE…

Format :     If (Kondisi) then                                    (Perintah)                            Else                                    (Perintah) Contoh Script : program Project3; {$APPTYPE...

Read More

PENULISAN CODING RUMUS MENGHITUNG LUAS & VOLUME

program Project2; {$APPTYPE CONSOLE} uses   SysUtils; var       r,t:integer;       l_lingkaran,v_tabung,v_kerucut:real; begin   writeln('NAMA : AZIZUN NURRAHMAN');   writeln('NIM  : 114224008');   writeln('=================================');   writeln('Program Menghitung Luas Lingkaran');   writeln('=================================');   write('Masukkan jari-jari = ');readln(r);  ...

Read More

PENULISAN CODING IF...ELSE...IF

Apabila ada perintah if dalam perintah If yang lain. Kondisi ini dibutuhkan pada saat kriteria yang akan dimasukkan lebih dari satu.     Format :        if (Kondisi 1) then else                          if (Kondisi 2) then else                               (Proses 1)  ...

Read More