Soal Latihan Pascal

Buatlah program PASCAL menggunakan seleksi kondisi IF...THEN / IF...THEN...ELSE / CASE .. OF sehingga menampilkan hasil keluaran seperti berikut :



Jika memasukkan pilihan di luar yang ada, tampilannya seperti berikut :



Harga sewa /hari :
Sedan : 300000
Pick Up : 200000
Mini Bus : 800000
Bus : 3000000


Buatlah program PASCAL mencari sisi miring segi tiga siku-siku menggunakan perulangan FOR...TO atau WHILE ... DO sehingga menghasilkan hasil keluaran sebagai berikut :




Di mana : C=sqrt(sqr(A)+sqr(B))