https://minasoftprogrammation.blogspot.com/2022/11/If-Else-In-Pascal.html