https://www.simentik.eu.org/2019/05/contoh-program-perulangan-pascal.html