Tugas_Algoritma

Mohon maaf kepada Mahasiswa Ilkom 2010,
Karena hari ini praktikum Algoritma harus ditiadakan.
Karena kakak ada agenda Urgent yang harus diselesaikan dalam waktu sangat dekat.
untuk itu kepada rekan-rekan 2010 harap mencari referensi mengenai fungsi,procedure,dan case
mudah-mudahan sudah diajarkan di Pemrog.1
sehingga bisa mengerjakan tugas ini.

Membuat sebuah program yang terdiri atas procedure/fungsi ttg luas segitiga, dan lingkaran, yang akan
di akses dengan case dalam program utama.

Tugas dikumpulkan dalam bentuk hardcopy beserta printscreen hasil running program,
dikumpulkan dengan tugas sebelumnya tentang penarikan uang di ATM,
pada Hari jumat 18 Maret 2011 saat praktikum yang akan datang.

Logika Berpikir -->

use crt;

var . . .

Procedure nama_procedure/fungsi
begin
.
.
.
end;

Procedure nama_procedure/fungsi
begin
.
.
.
end;

Begin {program utama}

write(...........)
.
.
.
case (.........) of

1 : ....... --> panggil procedure/fungsi
2 : ....... --> panggil procedure/fungsi

end;
.
.
.
end.

Contoh hasilnya :

1. Luas Segitiga
2. Luas Lingkaran

Masukkan kode operasi (1/2) : 1

Masukkan tinggi segitiga : 1
Masukkan alas segitiga : 2

Luas segitiga adalah 1 cm^2