https://minasoftprogrammation.blogspot.com/2022/10/Read-and-Readln-in-Pascal.html