1| //Program Mencari Volume Tabung Dengan Menggunakan Fungsi
2| #include <iostream.h>
3| #define phi 3.141592654
4| double luas_alas(double r)
5| {
6| double luas;
7| luas = phi*r*r;
8| return luas;
9| }
10| void main()
11| {
12| double volume,tinggi,radius;
13| cout<<"Radius Tabung = ";
14| cin>>radius;
15| cout<<"Tinggi Tabung = ";
16| cin>>tinggi;
17| volume = luas_alas(radius)*tinggi;
18| cout<<"Volume Tabung = "<<volume<<endl;
19| }
Penjelasan Program:
1| Keterangan program yang tidak ikut dieksekusi.
2| Memanggil file header iostream.h; fungsi endl, cout, cin terdapat pada iostream.h.
3| Mendefinisikan konstanta phi agar bernilai 3.141592654.
4| Fungsi untuk mencari luas alas dari tabung yang bertipe data double. Fungsi ini diberi nama luas_alas. (double r) menunjukkan parameter yang dimasukkan ke dalam fungsi, dalam hal ini berarti nilai untuk variabel r.
5| Menyatakan awal dari fungsi luas_alas.
6| Mendeklarasikan variabel luas dengan tipe data double.
7| Memuat variabel luas dengan nilai hasil dari "phi*r*r".
8| Mengembalikan nilai variabel luas ke dalam fungsi luas_alas.
9| Menyatakan akhir dari fungsi luas_alas.
10| Program utama (main) yang bertipe void. Digunakan tipe void karena untuk program utama ini tidak perlu untuk mempunyai nilai kembalian.
11| Menyatakan awal dari program utama (main).
12| Mendeklarasikan variabel volume, tinggi, radius dengan tipe data double.
13| Menampilkan tulisan "Radius Tabung = " pada layar.
14| cin>>radius berarti meminta input data dari user dan memasukkan nilai data tersebut ke dalam variabel radius.
15| Menampilkan tulisan "Tinggi Tabung = " pada layar.
16| cin>>tinggi berarti meminta input data dari user dan memasukkan nilai data tersebut ke dalam variabel radius.
17| Memuat variabel volume dengan nilai hasil dari "luas_alas(radius)*tinggi". luas_alas(radius) berarti memasukkan nilai variabel radius ke dalam fungsi luas_alas. Dalam hal ini nilai variabel r = radius.
18| Menampilkan isi dari variabel volume pada layar.
19| Menyatakan akhir dari program utama (main).
