Di part 2 ini saya akan membuat program kebenaran Gerbang Logika dengan menggunakan perintah 'procedure', di posting sebelumnya hanya menggunakan 'if...then...'. Tapi program ini belum sempurna, karena setelah selesai menghitung maka akan langsung close program, tidak kembali ke menu awal. Mungkin temen2 bisa menambahkan sendiri program tersebut.
Saya masih menggunakan freepascal, soalnya kalo pake pascal yg biasa cuma bisa di instal di OS 32bit, jika di OS 64bit harus menggunakan aplikasi Dos box. Karna saya pengen yang simple jadi pake freepascal aja deh. *teehee
flowchartnya seperti ini:
Source codenya:
Selamat mencoba ^^.
Tidak ada komentar:
Posting Komentar