Declaraciones en Fortran
Cuatro variables tipadas para el diario del faro, declaradas antes de que corra ninguna sentencia.
program declarations
! implicit none turns off the 1950s i-through-n typing rules.
implicit none
integer :: lamp_turns = 148
real :: oil_gallons = 6.5
character(len=12) :: station = "Gull Rock"
logical :: storm_watch = .true.
print *, "Station: ", station
print *, "Turns tonight: ", lamp_turns
print *, "Oil on hand: ", oil_gallons
print *, "Storm watch? ", storm_watch
end program declarations
Cómo funciona
implicit noneapaga la regla de los cincuenta que tipaba las variables por su primera letra.integer,real,character(len=12)ylogicalcubren lo básico;::separa el tipo del nombre.- Los inicializadores viajan en la declaración, y
.true.es como se escriben los lógicos.
Palabras clave y builtins usados aquí
characterendimplicitintegerlenlogicalnoneprintprogramreal
El intento, en números
- Líneas
- 13
- Caracteres a escribir
- 396
- Tokens
- 59
- Ritmo de tres estrellas
- 70 tpm
Al ritmo de tres estrellas de 70 tokens por minuto, este intento toma unos 51 segundos.
Paso 2 de 3 en Programas y variables; paso 2 de 27 en Fundamentos del lenguaje.