Nota como hemos puesto el resultado directamente en la llamada a la función "writeln".