Soal PASCAL

Buatlah :
Program Menghitung Luas dan Keliling Lingkaran ,
Luas = PI * Jari * Jari
Keliling = 2 * PI * Jari
Bentuk Outputnya :
Masukan Jari - Jari Lingkaran (Cm) : …….
Luas Lingkaran Tersebut : …….
Kelilingnya Adalah : ……..

Soal 2.1 dan 2.2
Perusahaan Di Kota “Z” memepunyai Tarif Rp100 per pulsa.Setiap Langganan dikenakan biaya langganan Sebesar Rp 3000 perbulan. Jumlah pulsa =235. Buatlah program untuk menghitung tagihan langganan.
Bentuk Outputnya :
Masukan Jumlah Pulsa : ………..
Jumlah Tagihan Yang Harus Dibayar : Rp…..

Soal 2.3
Perusahaan Di Kota ” Z ” memepunyai Tarif Rp100 per pulsa.Setiap Langganan dikenakan biaya langganan Sebesar Rp 3000 perbulan. Jumlah pulsa = 235. Buatlah program untuk menghitung tagihan langganan.
Bentuk Outputnya :
Nomer Langganan :………….
Nama Langganan :…………
Alamat :…………..
Perincian Tagihan :
———————–
Biaya Berlangganan : Rp…………
Biaya Pulsa……….xRp.100 : Rp…………
————————————————–
Total Tagihan : Rp…..

Soal 2.4
Gaji pegawai PT. Mundur Maju dihitung berdasarkan beberapa hal, diantaranya :
- Gaji Pokok
- Tunjangan
- Upah Lembur
Tunjangan pegawai adalah 15 % dari gaji pokok upah lembur perjam adalah 1,5 % dari Gaji Pokok,Buatlah Program Untuk Menghitung gaji yang diterima Pegawai.
Masukan : Nama,Nip,gaji pokok dan jam lembur.
Bentuk Outputnya :
Perincian Gaji Pegawai
—————————-
Gaji Pokok : Rp…………
Tunjangan : Rp…………
Upah Lembur : Rp…………
————————————————–
Gaji Total : Rp…..

Soal 3.5
Buat program yang dapat menerima masukan bilangan dengan desimal koma bukan titik,misalnya 12,5.Program akan menjalankan dua bilangan yang memekai tanda koma.
Masukan : Dua Bilangan dengan desimal koma
Keluaran : Hasil Penjualan dengan desimal koma
Petunjuk : Langkah - Langkah
1. Masukan data dua bilangan ke dalam Variabel String
2. Cari Posisi Koma didalam setiap string (Pakai Fungsi Pos )
3. Ganti Koma Disetiap String Dengan Titik
4. Ubahlah String Tersebut menjadi numerik (Pakai Fungsi Val)
5. Jumlahkan Kedua Bilangan tersebut
6. Ubahlah hasil Penjumlahan menjadi String (Pakai Fungsi Str)
7. Cari Posisi titik (Pakai Fungsi Pos)
8. Ganti Titik tersebut dengan kom

Soal 4.1
Peruahaan taxi Sepanjang Jalan Kenangan mempunyai peraturan sbb, tarif kilometer pertama Rp. 1500.kilometer Berikutnya adalah Rp.350
- Km = 0.5 , Bayar = Rp.1500
- Km = 5 , Bayar = 1500 + ( 5 * 350)= Rp.3250
Buatlah Program yang akan menghitung pembayaran penumpang
Masukan : Jarak yang ditempuh
Keluaran : Jumlah pembayaran

Soal 4.2
Sebuah LPK ternama di Purwokerto, mengadakan test Program komputer yang akan diadakan tiga kali test (terdiri dari program Basic , Pascal , Bahasa C ). Test ini didakan untuk menentukan Gride dan besarnya biaya Kursus Bila Siswea tersebut ingin melanjutkan ke tingkat yang lebih tinggi. Ketentuan Nilai :
Nilai
Grade Besar Biaya
91 - 100 A 50000
76 - 90 B 150000
60 - 75 C 250000
40 - 59 D 350000
01 - 39 E 450000
0 0 550000
Masukan : Nilai dari ketiga test tersebut, Proses rata-ratanya menjadi nilai akhir
Keluaran : Grade dan Jumlah Bayarnya
Keterangan : Gunakan Fungsi IF


Soal 5.1
Sebuah Perusahaan Amit-Amit Membagi Karyawannya
menjadi tiga golongan, Yaitu 1 , 2 ,3 .
Upah harian dan upah lembir perjam tiap tiap golongan adalah :
Gol Upah Lembur Upah Lembur Perjam
1 2250 400
2 2600 475
3 3250 600
Upah Lembur Akan Diberikan Jika pegawai bekerja lebih dari 8 Jam.
Buatlah Program yang menghitung upah yang diterima pegawai
Masukan : Nama Pegawai, Golongan dan Jam Kerja.
Keluaran : Upah Total
Petunjuk : Gunakan Fungsi Case dengan Blok ( Begin….end. )

Soal 5.2
Sebuah LPK ternama di Purwokerto, mengadakan test Program komputer yang akan diadakan tiga kali test (terdiri dari program Basic , Pascal , Bahasa C ). Test ini didakan untuk menentukan Gride dan besarnya biaya Kursus Bila Siswea tersebut ingin melanjutkan ke tingkat yang lebih tinggi. Ketentuan Nilai :
Nilai
Grade Besar Biaya
91 -100 A 50000
76 - 90 B 150000
60 - 75 C 250000
40 - 59 D 350000
01 - 39 E 450000
0 0 550000
Masukan : Nilai dari ketiga test tersebut, Proses rata-ratanya menjadi nilai akhir
Keluaran : Grade dan Jumlah Bayarnya
Petunjuk : Gunakan Fungsi Case Of

Soal 5.3
Sebuah Toko Bangkrut Terus menjual beberapa merk susu kaleng, yaitu :
1. Dancow
2. Indomilk
3. Milo
4. Suprima
5. Sustagen
6. Ovaltime
7. Ducth Lady
Tiap - tiap merk dijual dalam ukuran Besar, Sedang, Kecil.
Harga Satuannya Adalah :


Merk
Besar Sedang Kecil
Dancow 10000 4250 2100
Indomilk 8500 4000 2025
Milo 7750 3750 2200
Suprima 9600 5100 2600
Sustagen 17000 14500 83000
Ovaltime 11250 6500 3250
Ducth Lady 10500 7500 4500
Masukan :
- Merk Susu ukurannya ( B / S / K )
dan banyaknya yang dibeli
Keluaran :
- Harga susu dan jumlah yang harus di bayar
- Tampilkan juga jumlah kembaliannya
jika Uang yang dibayar > Harga

Petunjuk :
- Gunakan Fungsi Case dengan Blok ( Begin….end. )