Estruturas de dados em FORTRAN

Neste post  irei mostrar como criar estruturas de dados utilizando a linguagem de programação FORTRAN, a primeira llinguagem considerada de alto-nível.

Estrutura é um conjunto de variáveis que possuem um relacionamento entre si, como por exemplo um cadastro de pessoas, onde as mesmas possuem um nome, idade, endereço, etc. onde é criado um alias (apelido) para essa estrutura de forma que todas as propriedades possam ser acessadas por esse nome. É um recurso semelhante ao utilizado na programação orientada a objetos.

Para declarar uma estrutura em FORTRAN utiliza-se o comando type, e sua sintaxe é a seguinte:

type nome_type

      declarações

end type nome_type

Nome_type é o nome do bloco, e deve seguir as mesmas regras para nomes de variáveis, esse bloco pode ser utilizado diversas vezes conforme necessário, ele possuirá as variáveis feitas na seção declaração.

Atribuindo valores

Pode-se atribuir valores à uma estrutura (type) das seguintes formas:

! Associação

type (nome_type) :: nome

! Atribuiçãp

nome = nome_type(valor_das_variaveis)

                           OU

nome%nome_variavel = valor_da_variavel

Exemplo:

! ——————————–
! Exemplo do tipo Type
!
! ——————————–
program exemplo_type
        ! declara‡Æo do type
        type anivers
             ! vari veis
             character*10 nome
             character*10 mes
             integer*1 dia
        end type anivers
       
        type(anivers) :: edson
        type(anivers) :: joaquim
        type(anivers) :: francisco
       
        ! Atribui‡Æo de valor
        edson = anivers(‘Edson’, ‘Setembro’, 7)
        joaquim = anivers(‘Joaquim’, ‘Agosto’, 27)
        francisco %nome = ‘Francisco’
        francisco %mes = ‘Agosto’
        francisco %dia = 22
       
        ! impressÆo na tela
        write(*,*) edson %mes
        write(*,*) edson %nome, edson %dia
        ! sa¡da formatada
        write(*,'(1x, a, a, i2′) francisco
        ! espera que a tecla ENTER seja pressionada
        read(*,*)
end program

 

Bom, por hoje é só, até a próxima.

Anúncios

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s