Constantes con nombre en Fortran
parameter crea una constante que el compilador va a defender, de pi al tamaño de la tripulación.
program parameters_constants
implicit none
! parameter makes a named constant; the compiler holds you to it.
real, parameter :: pi = 3.141593
real, parameter :: earth_radius_km = 6371.0
integer, parameter :: crew = 12
print *, "Equator, roughly: ", 2.0 * pi * earth_radius_km, " km"
print *, "Walking shifts of ", crew, " keepers"
end program parameters_constants
Cómo funciona
real, parameter :: pi = 3.141593fija el valor en tiempo de compilación.- Asignar a un
parameterdespués es un error de compilación, no una sorpresa. - La expresión de la circunferencia usa las constantes como cualquier otro valor.
Palabras clave y builtins usados aquí
endimplicitintegernoneparameterprintprogramreal
El intento, en números
- Líneas
- 10
- Caracteres a escribir
- 364
- Tokens
- 49
- Ritmo de tres estrellas
- 70 tpm
Al ritmo de tres estrellas de 70 tokens por minuto, este intento toma unos 42 segundos.
Paso 3 de 3 en Programas y variables; paso 3 de 27 en Fundamentos del lenguaje.