Mencari Luas Pada Pascal

Berikut adalah kodingan untuk mencari luas pada pascal berbeda dengan mencari luas pada phyton sebelumnya program ini lebih singkat disini ada write maupun read yang membedakannya namun cara kerjanya sama kita sama-sama memilih pilihan berapa kemudian masukan angka dan perogram ini akan menghitung sendiri:







Outputnya adalah: