Laporan Delapan tentang Fungsi

Program Pascal

A.     Program hitung

Coding program :

1.    Function hitung (X, Y, Z : byte): byte;

2.    Begin

3.             Z : = X + Y;

4.             Writeln (‘Nilai X’ = ‘X’);

5.             Writeln (‘Nilai Y’ = ‘Y’);

6.             Writeln (‘Nilai Z’ = ‘Z’);

7.    End;

8.    Var

9.             A, B, C : byte ;

10.                     Begin

11.                     A := 5;

12.                     B := 7 ;

13.                     C:= 3 ;

14.                               Hitung (A, B, C);

15.                               Writeln (‘Nilai A =‘,A,’Nilai B=’,B,’Nilai C =’,C);

16.                               Readln;

17.                     End.

Logika Program :

·        Pada langkah no.1 function hitung dengan nama variabel byte untuk menyatakan X,Y,Z sebagai tipe data keluaran.

·        Pada langkah no.2 digunakan begin untuk memulai eksekusi program.

·        Pada langkah no.3 dinyatakan proses program yaitu { Z = X + Y }

·        Pada langkah no.4-6 dinyatakan variabel keluaran.

·        Pada langkah no.16 digunakan readln sebagai perintah untuk memasukkan data sesuai tipe data yang ada pada program.

·        Pada langkah no.17 digunakan {end.} untuk mengakhiri program.

·        Pada langkah no 1-7 merupakan program utama.

·        Pada langkah no 8-17 merupakan program kedua atau berikutnya.

·        Fungsi  dapat dipanggil oleh program utama atau program lainnya dan menghasilkan nilai.

Input Program

Output program