Mudanças entre as edições de "Fortran"

Edição das 19h56min de 17 de fevereiro de 2009

A família de linguagens de programação conhecida globalmente como Fortran foi desenvolvida a partir da década de 1950 e continua a ser usada hoje em dia. O nome tem como origens a expressão "FORmula TRANslation" (ou "Translator").

As versões iniciais da linguagem eram conhecidas como FORTRAN, mas a capitalização foi ignorada em versões recentes da linguagem começando a partir do Fortran 90. Os padrões oficiais da linguagem referem-se a ela atualmente como "Fortran".

A linguagem Fortran é principalmente usada em Ciência da Computação e Análise Numérica. Apesar de ter sido inicialmente uma linguagem de programação procedural, versões recentes de Fortran possuem características que permitem suportar programação orientada por objetos.

Compiladores

WATFOR 

a versão do FORTRAN IV desenvolvida na Universidade de Waterloo, Canadá, foi universalmente preferida pois o compilador produzia melhores relatórios dos erros de compilação.

Fortran Powerstation 4.0 

comercializado pela Microsoft.

Visual Fortran 

versão comercializada primeiramente pela Digital e depois pela Compaq. Uma evolução da versão da Microsoft.

g95 

Free, open source Fortran 95 compiler and runtime libraries

Fortran 95 Silverfrost

um compilador grátis que pode ser obtido na internet:

Código Teste

Alguns compiladores possuem um ambiente gráfico e um bloco de notas para digitar os programas. No compilador Silverfrost:

• Crie um arquivo novo clicando em New. Escolha Free Format. Uma janela de texto deve abrir.
• Digite o código fonte abaixo.

  program ola
  print *,"Ola mundo"
  end

• No menu Build, clique em Start Run para rodar o programa. Salve o programa com o nome teste.f90. Deverá abrir uma janela de comando e aparecer a mensagem

 Ola mundo

Medindo o tempo

Um exemplo de como medir o tempo em Fortran.

program dago
use portlib
real*8, dimension(10000) ::  x,y,s
real*4                   ::  tempo
integer                  ::  k,i

do i=1,100
   x(i)=i
   y(i)=0.d0
end do

print *,"Comecei..."

tempo = SECNDS(0.0)
do k=1,100000
   do i=1,10000
       s(i)=x(i)+y(i)
   end do
end do

tempo = SECNDS(tempo)
print *,"Tempo (s): ",tempo

end

Ver também

• [1]
• [2]