Seorang sekretaris memerlukan satu program sederhana yang dapat membantunya mengetahui nomor telepon seseorang dengan cepat tanpa harus membuka buku agendanya.
Andaikan nama-nama orang tersebut adalah sebagai berikut:
Anton (0411) 324-678
Bahrul (021) 434-6783
Charles (022) 256-1234
Daud (0411) 567-342
Endang (0411) 344-235
Fahri (021) 765-0856
Gunarsih (0421) 123-876
Analisis :
1. Ketika program dijalankan maka muncul permintaan untuk memasukkan satu nama.
2. Nama ini kemudian dicari misalnya dengan rentetan if/then/else atau dengan intruksi case().
3. Bila nama tersebut ketemu tidak ada maka tampilkan “nama tersebut tidak ada!”.
Algoritma Buku_telepon
{ mencari nomor telepon seseorang}
Deklarasi
string nama, notelp;
Dekripsi
write (“Ketik namanya :”);
read ( nama );
case (nama)
‘Anton’ : notelp ‘(0411) 324-678’;
‘Bahrul’ : notelp ‘(021) 434-6783’;
‘Charles’ : notelp ‘(022) 256-1234’;
‘Daud’ : notelp ‘(0411) 567-342’;
‘Endang’ : notelp ‘(0411) 344-235’;
‘Fahri’ : notelp ‘(021) 765-0856’;
‘Gunarsih’ : notelp ‘(0421) 123-876’;
default : notelp ‘nama tsb tdk ada’;
endcase.
write (notelp);
Tidak ada komentar:
Posting Komentar