O programa em Pascal Exemplo1 pede ao usuário para digitar um número e mostra, na tela, o reverso desse número, isto é, se o usuário digitar o número 75, por exemplo, o programa mostrará, na tela, o número 57.
program Exemplo1; var num1, num2, x, y: integer; begin writeln(‘Digite um inteiro com obrigatoriamente com dois algarismos’); readln(num1); x := num1 mod 10; y := num1 div 10; num2 := x * 10 + y; writeln(num2); end.