Algoritma dan Contoh Pemograman
Algoritma : alur program ata langkah2 dalam menyelesaikan masalah.
Program yg akrab (user friendly):
-komunikatif
-mudah digunakan
-singkat,jelas,terstruktur&fleksibel
Fasilitas kemudahan bagi pemakai :
petunjuk singkat penggunaaan program,pernyataan eror,cara mengatasi kesalahan,fasilitas help.
Hal-hal penting membuat program User Friendly :
- Tujuan/Judul program
- Petunjuk pengoperasian program
- Pesan kesalahan
- Keterangan siap panggil
- Tata letak peragaan
- Hemat kegiatan
- Fleksibel
Modular : penyelesaian masalah per bagian/program yg dibagi2, tidak perlu tahu apa yang digunakan yang penting tahu input yang masuk apa&output yang diterima.
- kemampuan manusia menyelesai
kan masalah terbatas
- manusia hanya sanggup memikir kan bagian tertentu dari program tsb
- Diperlukan pemecahan masalah secara bertahap.
Kesalahan pemogram ada 2 yaitu :
1.Kesalahan Syntax : Kesalahan dalam penulisan atau pengetikan instruksi. Kesalahan syntax dideteksi oleh compiler interpreter.
contoh : ”intruksi tidak dikenal”
2.Kesalahan Logika :kesalahan yg terjadi dalam pemikiran
Dummy module :
program yang tidak ada isinya, tapi cuma untuk memanggil aja.
Percabangan :
- Tidak setiap baris program akan dikerjakan/dilewati.
-hanya yg memenuhi syarat(kondisi)
-syarat tdd operand2,yg dihubungkan dg operator relasi& operator logika
-menghasilkan pernyataan Boolean, yang dapat bernilai benar(true) atau salah (false)
-menggunakan perintah:if_then_else
1.Buat program algoritma menghitung isi benda : Limas,kerucut,balok, silinder&bola dlm modular.
proc Periksa (Pilihan)
read (pilihan)
while Pilihan<0 dan Pilihan>5 do
while (”Berikan pilihan anda sekali lagi,Pilihan anda salah”)
read (Pilihan)
ewhile
eproc
proc Peragaaan_Menu()
write(”Menghitung Isi Benda”)
write(”1:Menghitung Isi Limas”)
write(”2:Menghitung Isi Kerucut”)
write(”3:Menghitung Isi Balok”)
write(”4:Menghitung Isi Silinder”)
write(”5:Menghitung Isi Balok”)
eproc
proc Isi_Limas()
write(”Menghitung Isi Limas”)
write(”Masukkan Panjang Limas:”)
write(”Masukkan Lebar Limas:”)
write(”Masukkan Tinggi Limas:”)
read(Panjang:)
read(Lebar:)
read(Tinggi:)
isi=((PanjangxlebarxTinggi/6)
write(”isi:”, isi)
eproc
proc Isi_Kerucut()
write(”Menghitung Isi Kerucut”)
write(”Masukkan Jari-jari Alas Kerucut:”)
write(”Masukkan Tinggi Kerucut:”)
read(Jari-jari:)
read(Tinggi:)
isi=((PhixJari-jarixJari-jarixTinggi/3)
write(”isi:”, isi)
eproc
proc Isi_Silinder()
write(”Menghitung Isi Silinder”)
write(”Masukkan Jari-jari Alas Silinder:”)
write(”Masukkan Tinggi Silinder:”)
read(Jari-jari:)
read(Tinggi:)
isi=((PhixJari-jarixJari-jarixTinggi)
write(”isi:”, isi)
eproc
proc Isi_Bola()
write(”Menghitung Isi Bola”)
write(”Masukkan Jari-jari Bola:”)
write(”Masukkan Tinggi Silinder:”)
read(Jari-jari:)
read(Tinggi:)
isi=((PhixJari-jarixJari-jarixJari-jari)
write(”isi:”, isi)
eproc
proc Isi_Balok()
write(”Menghitung Isi Balok”)
write(”Masukkan Panjang Balok:”)
write(”Masukkan Lebar Balok:”)
write(”Masukkan Tinggi Balok:”)
read(Panjang:)
read(Lebar:)
read(Tinggi:)
isi=((PanjangxlebarxTinggi/6)
write(”isi:”, isi)
eproc
Begin
Peragakan_Menu()
Periksa(Pilihan)
While(Pilihan)<>0 do
case Pilihan of
1:Menghitung Isi Limas()
2:Menghitung Isi Kerucut()
3:Menghitung Isi Balok()
4:Menghitung Isi Silinder()
5:Menghitung Isi Balok()
ecase
Peragakan_Menu()
Periksa(Pilihan)
ewhile
write(”Selesai”)
end
2.Buat program konversi Suhu
Program ISI(input,output)
proc peragaan_menu()
write(”Menghitung konversi suhu”)
write(”1:Konversi Fahrenheit ke Celcius”)
write(”2:Konversi Reamur ke Celcius”)
eproc
proc cek(pilihan)
read(pilihan)
while pilihan<0 AND pilihan>2 do
while (“Pilihan anda salah,Masukkan pilihan lain“)
read(pilihan)
ewhile
eproc
proc konversi_fahrenheit ke celcius()
write(“konversi fahrenheit ke celcius“)
write(“Masukkan nilai Tf:“)
read(nilai Tf)
TC=((Tf-32)x4/9)
write(“TC:“, TC)
eproc
proc konversi_Reamur ke celcius()
write(“konversi Reamur ke celcius“)
write(“Masukkan nilai Tr:“)
read(nilai Tr)
TC=((Trx5/4)
write(“TC:“, TC)
eproc
program utama()
begin
pilihan=1
while pilihan<> 0 do
peragakan_menu()
cek(pilihan)
case pilihan of
1:konversi_fahrenheit ke celcius()
2: konversi_Reamur ke celcius()
ecase
ewhile
write (“selesai“)
end
eprog
Program yg akrab (user friendly):
-komunikatif
-mudah digunakan
-singkat,jelas,terstruktur&fleksibel
Fasilitas kemudahan bagi pemakai :
petunjuk singkat penggunaaan program,pernyataan eror,cara mengatasi kesalahan,fasilitas help.
Hal-hal penting membuat program User Friendly :
- Tujuan/Judul program
- Petunjuk pengoperasian program
- Pesan kesalahan
- Keterangan siap panggil
- Tata letak peragaan
- Hemat kegiatan
- Fleksibel
Modular : penyelesaian masalah per bagian/program yg dibagi2, tidak perlu tahu apa yang digunakan yang penting tahu input yang masuk apa&output yang diterima.
- kemampuan manusia menyelesai
kan masalah terbatas
- manusia hanya sanggup memikir kan bagian tertentu dari program tsb
- Diperlukan pemecahan masalah secara bertahap.
Kesalahan pemogram ada 2 yaitu :
1.Kesalahan Syntax : Kesalahan dalam penulisan atau pengetikan instruksi. Kesalahan syntax dideteksi oleh compiler interpreter.
contoh : ”intruksi tidak dikenal”
2.Kesalahan Logika :kesalahan yg terjadi dalam pemikiran
Dummy module :
program yang tidak ada isinya, tapi cuma untuk memanggil aja.
Percabangan :
- Tidak setiap baris program akan dikerjakan/dilewati.
-hanya yg memenuhi syarat(kondisi)
-syarat tdd operand2,yg dihubungkan dg operator relasi& operator logika
-menghasilkan pernyataan Boolean, yang dapat bernilai benar(true) atau salah (false)
-menggunakan perintah:if_then_else
1.Buat program algoritma menghitung isi benda : Limas,kerucut,balok, silinder&bola dlm modular.
proc Periksa (Pilihan)
read (pilihan)
while Pilihan<0 dan Pilihan>5 do
while (”Berikan pilihan anda sekali lagi,Pilihan anda salah”)
read (Pilihan)
ewhile
eproc
proc Peragaaan_Menu()
write(”Menghitung Isi Benda”)
write(”1:Menghitung Isi Limas”)
write(”2:Menghitung Isi Kerucut”)
write(”3:Menghitung Isi Balok”)
write(”4:Menghitung Isi Silinder”)
write(”5:Menghitung Isi Balok”)
eproc
proc Isi_Limas()
write(”Menghitung Isi Limas”)
write(”Masukkan Panjang Limas:”)
write(”Masukkan Lebar Limas:”)
write(”Masukkan Tinggi Limas:”)
read(Panjang:)
read(Lebar:)
read(Tinggi:)
isi=((PanjangxlebarxTinggi/6)
write(”isi:”, isi)
eproc
proc Isi_Kerucut()
write(”Menghitung Isi Kerucut”)
write(”Masukkan Jari-jari Alas Kerucut:”)
write(”Masukkan Tinggi Kerucut:”)
read(Jari-jari:)
read(Tinggi:)
isi=((PhixJari-jarixJari-jarixTinggi/3)
write(”isi:”, isi)
eproc
proc Isi_Silinder()
write(”Menghitung Isi Silinder”)
write(”Masukkan Jari-jari Alas Silinder:”)
write(”Masukkan Tinggi Silinder:”)
read(Jari-jari:)
read(Tinggi:)
isi=((PhixJari-jarixJari-jarixTinggi)
write(”isi:”, isi)
eproc
proc Isi_Bola()
write(”Menghitung Isi Bola”)
write(”Masukkan Jari-jari Bola:”)
write(”Masukkan Tinggi Silinder:”)
read(Jari-jari:)
read(Tinggi:)
isi=((PhixJari-jarixJari-jarixJari-jari)
write(”isi:”, isi)
eproc
proc Isi_Balok()
write(”Menghitung Isi Balok”)
write(”Masukkan Panjang Balok:”)
write(”Masukkan Lebar Balok:”)
write(”Masukkan Tinggi Balok:”)
read(Panjang:)
read(Lebar:)
read(Tinggi:)
isi=((PanjangxlebarxTinggi/6)
write(”isi:”, isi)
eproc
Begin
Peragakan_Menu()
Periksa(Pilihan)
While(Pilihan)<>0 do
case Pilihan of
1:Menghitung Isi Limas()
2:Menghitung Isi Kerucut()
3:Menghitung Isi Balok()
4:Menghitung Isi Silinder()
5:Menghitung Isi Balok()
ecase
Peragakan_Menu()
Periksa(Pilihan)
ewhile
write(”Selesai”)
end
2.Buat program konversi Suhu
Program ISI(input,output)
proc peragaan_menu()
write(”Menghitung konversi suhu”)
write(”1:Konversi Fahrenheit ke Celcius”)
write(”2:Konversi Reamur ke Celcius”)
eproc
proc cek(pilihan)
read(pilihan)
while pilihan<0 AND pilihan>2 do
while (“Pilihan anda salah,Masukkan pilihan lain“)
read(pilihan)
ewhile
eproc
proc konversi_fahrenheit ke celcius()
write(“konversi fahrenheit ke celcius“)
write(“Masukkan nilai Tf:“)
read(nilai Tf)
TC=((Tf-32)x4/9)
write(“TC:“, TC)
eproc
proc konversi_Reamur ke celcius()
write(“konversi Reamur ke celcius“)
write(“Masukkan nilai Tr:“)
read(nilai Tr)
TC=((Trx5/4)
write(“TC:“, TC)
eproc
program utama()
begin
pilihan=1
while pilihan<> 0 do
peragakan_menu()
cek(pilihan)
case pilihan of
1:konversi_fahrenheit ke celcius()
2: konversi_Reamur ke celcius()
ecase
ewhile
write (“selesai“)
end
eprog