3.2 Declarações e tipos de variáveis e constantes

Depois dessa primeira experiência temos que conhecer como fica a declaração de constantes e variáveis e qual o formato quanto a ser real, inteiro, complexo, lógico e carácter. Assim temos cinco formatos entre variáveis e constantes que podem ser tratadas dentro do Fortran 90.

integer - é um número que não contém casas decimais e podem assumir valores positivos, negativos ou zero. Exemplos 0, -934, 1982649, +13, 1000000. Os limites dentro de um computador tipo PC, que é o que estamos utilizando varia entre -2,147,483,648 e 2,147,483,647 que é um número de 32 bits;
real - é um número com casas decimais e podem assumir valores positivos, negativos ou zero e pode conter expoentes. Exemplos 8., -934.1, 2.5E3, 0.05E+1, 4.78E-5, 4.78D-5, 6.04D24;
complex - número que possui uma parte real e outra imaginária. A declaração é feita por exemplo: “complex :: var1", em que “var1=(parte-real,parte-complexa)";
character - uma variável ou constante do tipo caracter pode ser escrita como uma string de uma ou várias letras no limite de 32767 caracteres e sempre de vir entre entre ' ou ";
logical - é uma variável do tipo “.TRUE." ou “.FALSE.".

Conjunto de caracteres do Fortran 90/95

(26) Letras maiúsculas do alfabeto: A-Z;
(26) Letras minúsculas do alfabeto: a-z;
(10) Dígitos: 0 até 9;
(01) Caracter underscore: _
(05) Símbolos aritiméticos: + - * / **;
(17) Outros símbolos: ( ) . = , ' $ : ! % $ ; < > ? espaço

Abra o editor de texto e digite o programa abaixo, que chamará prog2.f90.

! DD/MM/AAAA Programador 
! O simbolo de exclamacao significa um comentario, apos o simbolo
! Programa exemplificando alguns os tipos de variaveis.
! kind=4 - simples preciscao - 7 casas decimais (1.175494E-38 3.402823E+38)
! kind=8 - dupla precisao - 15 casas decimais (2.225074D-308  1.797693D+308)
! kind=16 - quadrupla precisa - 31 casas decimais (2.225074Q-308 1.797693Q+308)
!
program variaveis
implicit none
!
! REAL COM SIMPLES PRECISAO
real(kind=4) :: var1
! REAL COM DUPLA PRECISAO
real(kind=8) :: var2
! INTEIRO
integer :: var3
! CARACTER
character(5) :: var4
!
var1 = 3.14159265358979323846264338327950288419E0
var2 = 3.14159265358979323846264338327950288419D0
var3 = 5829
var4 = "Computacional"
!
! ESCREVENDO NA TELA SEM FORMATO
write(*,*) var1,var2,var3,var4
!
stop
end program variaveis

Uma vez digitado o programa no editor de texto, o programa acima mostra os tipos de declarações mais usuais e como proceder no caso de números reais. Preste atenção que ocorreu algum problema com a exposição da constante/variável character var4, foi impresso na tela somente Compu e não Computacional, isso se deve ao fato da declaração ter sido feita somente para 5 caracteres; altere character(5) para character(30), compile e execute o programa novamente.

Vale lembrar que em Fortran os caracteres são case insensitive, isto significa que na declaração de constantes/variáveis ou no meio do programa:

Var1 = VAR1 = VAr1 = vaR1

então não se preocupe caso no meio do programa tenha utilizado maiúscula ou minúscula escrever uma variável ou constante. Na linguagem c/c++ o exemplo acima são todos diferentes um dos outros pelo fato de ser case sensitive, no linux em geral nomes de arquivos e diretórios são case sensitive, ou seja, nomes escritos em maiúsculas são diferentes dos nomes escritos em minúsculas assim como na linguagem c/c++ e diferentemente da linguagem Fortran.