https://www.simentik.eu.org/2018/10/contoh-program-pascal.html