https://edu.hanifmr.com/2011/05/contoh-program-case-of-8-pemrograman-pascal.html