Contoh Penyelesaian Kasus Sederhana Algoritma

Carilah Volume Kubus jika diketahui setiap sisi kubus memiliki nilai N?

Langkah pertama yang harus kita lakukan adalah dengan mencari rumus untuk mencari Volume Kubus. Jika diketahui rumus Volume Kubus = sisi a x sisi b x sisi c. Maka penerapan rumus tersebut dalam sebuah algoritma dapat dilakukan sebagai berikut:

Algoritma Volume_Kubus
{Algoritma untuk mencari nilai volume dari sebuah kubus}

Deklarasi
sisi : integer
vol : real

Deskripsi
write ('Masukkan Nilai Sisi Kubus = ') readln (sisi)
vol = sisi x sisi x sisi
writeln ('Nilai Sisi Kubus = ',vol :8:2)
readln
end.

selamat mencoba dengan menggunakan program Pascal!