Contoh Lanjutan Materi Prosedur dan Fungsi Bahasa Pascal

Contoh-contoh Prosedur dan Fungsi Bahasa Pascal

Pelajari konsep dan implementasi prosedur dan fungsi dalam bahasa Pascal dengan contoh-contoh praktis. Pahami cara menggunakannya dan tingkatkan pemahaman pemrograman Anda. Blog ini memberikan materi terkait prosedur dan fungsi dalam bahasa pascal serta contoh-contoh yang relevan terkait materi tersebut.  Berikut akan disajikan contoh-contoh program prosedurr dan fungsi bahasa pascal yang merupakan lanjutan pembahasan tulisan terkait prosedur dan fungsi bahasa pascal. lets read!!

Prosedur Penjumlahan

Membuat program penjumlahan dengan tambahan 1 parameter yang menyimpan nilai dari hasil penjumlahan.

program kalku81; uses crt; var     a,b : integer; procedure penjumlahan (a,b,hasil :integer) ; begin     hasil := a + b;     writeln ('Hasil Penjumlahan = ',hasil ); end; begin clrscr; writeln ('==Penjumlahan=='); write ('Masukkan nilai a = '); readln (a); write ('Masukkan nilai b = '); readln (b); Penjumlahan(a,b,0); readln; end.

Fungsi Penjumlahan

Membuat program penjumlahan dengan tambahan 1 parameter yang menyimpan nilai dari hasil penjumlahan.

program kalku81; uses crt; var     a,b : real; function penjumlahan (x,y,z : real) :real ; begin     z := x + y;     penjumlahan := z; end; begin clrscr; writeln ('==Penjumlahan=='); write ('Masukkan nilai a = '); readln (a); write ('Masukkan nilai b = '); readln (b); writeln ('Hasil Penjumlahan = ',penjumlahan(a,b,0) :0:2); readln; end.

Kalender 1 Tahun

Membuat program agar menampilkan kalender 1 tahun. 

Keterangan : Syntax Program cuku panjang sehingga akan lebih baik jika diakses melalui file langsung pada drive. Program dapat di akses melalui link drive berikut Program Kalender

Program Kalkulator

Membuat kalkulator sederhana yang berisi perintah KABATAKU(kali, bagi, tambah, kurang).

Keterangan : Keempat Program kalkulator penulis gabungkan kedalam satu program dengan pemilihan case of sesuai program yang diinginkan, didalamnya terdapat beberapa prosedur dan fungsi. Program dapat di akses melalui link drive berikut Program Kalkulator

Program Susunan Karakter

Membuat susunan karakter berbentuk segitiga, dengan berbagai kondisi rata kanan, rata kiri, rata tengah, dan program dibuat dengan menggunakan sub program fungsi dan prosedur serta dengan dan tanpa parameter.

Keterangan : Program susunan karekter dengan berbagai kondisi penulis gabungkan kedalam satu program dengan pemilihan case of sesuai program yang diinginkan, didalamnya terdapat beberapa prosedur dan fungsi. Program dapat di akses melalui link drive berikut Program Susunan Karakter 

Program Faktorial, Permutasi, Kombinasi bahasa pascal

Membuat program yang menghitung Faktorial, Permutasi dan Kombinasi dimana pada subprogram permutasi dalam proses penghitungannya menggunakan sub program faktorial dan sub program kombinasi menggunakan permutasi.

Keterangan : Program-program tersebut penulis gabungkan kedalam satu program dengan pemilihan case of sesuai program yang diinginkan, didalamnya terdapat beberapa prosedur dan fungsi. Program dapat di akses melalui link drive berikut Program_Faktorial_Permutasi_Kombinasi

Materi terkait prosedur dan fungsi bahasa pascal. klink tautan berikut atau cari di kolom pencarian untuk melihat materi terkait prosedur dan fungsi bahasa pascal. 

Terima Kasih Telah Membaca semoga bermanfaat, jika ada saran, kritik, dan pertanyaan silakan sampaikan di kolom komentar ya !!! see you...

Read More

Prosedur dan Fungsi Bahasa Pascal : Materi dan Contoh

Prosedur dan Fungsi Bahasa Pascal

Program dibagi kedalam Modul-Modul/subprogram, dimana Modul/subprogram dalam bahasa Pascal diimplementasikan dengan Prosedur dan fungsi. Prosedur/Fungsi dibentuk dengan mengelompokkan sejumlah perintah untuk menyelesaikan tugas tertentu. Subprogram prosedur dan fungsi sangat diperlukan jika kelompok perintah tersebut sering digunakan di tempat lain dalam program, sehingga programmer tidak perlu membuat syntax berulang kali.

A. PROCEDURE

Sebelum memanggil prosedur, kita harus mendefinisikan bagian-bagian subprogramnya. Berikut ini adalah daftar lengkap bagian-bagian deklarasi:

LABEL section
CONST section
TYPE section
VAR section
PROCEDUREs and FUNCTIONs section

Definisi prosedur sangat mirip dengan definisi program yang telah sering kita buat sebelumnya, karena juga terdiri dari header, bagian deklarasi, dan pernyataan. Syntax deklarasi nya sebagai berikut :

Procedure Nama_Prosedur [(parameter)];
[Deklarasi variabel ;]
Begin
…

statemen-statemen;
…

End;

Prosedur digunakan terutama untuk hal-hal spesifik atau yang sering dilakukan dan prosedur tidak mengembalikan nilai.

B. FUNCTION

Fungsi adalah subprogram yang mengembalikan nilai, yang kemudian ditetapkan ke nama fungsi dalam program panggilan. Fungsi yang ditentukan pengguna memiliki satu atau lebih parameter. Definisi fungsi muncul di bagian subprogram setelah bagian deklarasi program dan mencakup header, deklarasi, dan pernyataan. contoh header fungsi yang mengembalikan rata-rata tiga angka:

FUNCTION Avg(X, Y, Z :REAL) :REAL;

Header fungsi mirip dengan header prosedur, perbedaanya pada fungsi terdapat nilai yang dikembalikan mengikuti header fungsi (:REAL). Syntax deklarasi nya sebagai berikut :

Function Nama_fungsi [(parameter)]: Tipe_fungsi;
[Deklarasi variabel ;]
Begin
…

statemen-statemen;
[Nama_fungsi:=nilai_fungsi]
End;

Fungsi digunakan terutama untuk hal-hal spesifik atau yang sering dilakukan dan dapat mengembalikan nilai.

Kita telah belajar bagaimana membagi program Anda menjadi subprogram, maka kapan kita memilih menggunakan fungsi atau prosedur ?. berikut adalah poin penting untuk diingat:

1. Subprogram dideklarasikan setelah bagian deklarasi program dan terdiri dari header, deklarasi, dan pernyataan.

Header prosedur syntax: PROCEDURE name; or PROCEDURE procedure-name(list parameter formal);

Header fungsi syntax : FUNCTION function-name(list parameter formal) :TYPE nilai pengembalian;

2. Suatu prosedur disebut dengan namanya persis seperti pernyataan. Ketika parameter digunakan dalam panggilan prosedur, parameter tersebut harus cocok dengan parameter di header prosedur. Parameter prosedur adalah parameter nilai atau variabel. Parameter variabel digunakan ketika diperlukan prosedur untuk mengubah nilai parameter.

3. Fungsi biasanya disebut sebagai bagian dari ekspresi; fungsi mengembalikan nilai tunggal yang menggantikan nama fungsi dalam ekspresi tersebut.

4. Selalu ingat aturan yang mengontrol ruang lingkup dan hubungan antara variabel global dan lokal.

Contoh-contoh Prosedur dan Fungsi bahasa pascal :

Fungsi Rata-rata dan Standar Deviasi

Hitung rata-rata dan standar deviasi data diatas dengan modul tersendiri.

program fungsib; uses crt; var     data : array [1..100] of integer;     n,i: integer; function Rerata (x: array of integer):real; var     sum :real; begin     sum := 0;     for i := 0 to n do     begin         sum := sum + x[i];     end;     Rerata := sum/n; end; function stdev (x: array of integer):real; var     jumlah: integer;     jlh_k:real; begin     jumlah:=0;     jlh_k:=0;     for i:=1 to n do begin         jumlah:=jumlah+x[i];         jlh_k:=jlh_k+(x[i]*x[i]);     end;     Stdev:=sqrt((jlh_k-(jumlah*jumlah)/n)/(n-1)); end; begin clrscr; write ('Masukkan banyak data : '); readln (n);     for i := 1 to n do     begin         write ('Data ke-',i, ' = ');         readln (data[i]);     end;     writeln ;     for i := 1 to n do     begin         write (data[i],' ');     end;     writeln;     writeln ('Rata-rata = ',Rerata(data):0:2)     writeln ('Standar Deviasi = ',stdev(data):0:2); readln; end.

Prosedur Pangkat 2

Menjalankan program pangkat 2 pada setiap n yang dimasukkan (1^2, 2^2, .....).

program belajar_procedure; uses crt; var     n,hasil : integer; procedure pangkat2(a:integer); begin     hasil := a*a; end; begin clrscr; write ('Masukkan N = ');readln (n); pangkat2(n); writeln ('Pangkat 2 dari ',n,' = ',hasil); readln; end.

Contoh - contoh lanjutan terkait prosedur dan fungsi bahasa pascal. klik link tautan berikut atau cari di kolom pencarian untuk melihat contoh-contoh lain terkait instruksi prosedur dan fungsi bahasa pascal. 

Terima Kasih Telah Membaca semoga bermanfaat, jika ada saran, kritik, dan pertanyaan silakan sampaikan di kolom komentar ya !!! suara kalian sangat berarti...see you... 

Referensi : Abolrous, Sam A.2002.Learn Pascal in Three Days Third Edition.Texas:Wordware Publishing Inc

Read More