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

De WikiLICC
Ir para: navegação, pesquisa
(Código Teste)
(Medindo o tempo)
Linha 35: Linha 35:
 
  real*4                  ::  tempo
 
  real*4                  ::  tempo
 
  integer                  ::  k,i
 
  integer                  ::  k,i
 
+
 
  do i=1,100
 
  do i=1,100
 
     x(i)=i
 
     x(i)=i
 
     y(i)=0.d0
 
     y(i)=0.d0
 
  end do
 
  end do
 
+
 
  print *,"Comecei..."
 
  print *,"Comecei..."
 
+
 
  tempo = SECNDS(0.0)
 
  tempo = SECNDS(0.0)
 
  do k=1,100000
 
  do k=1,100000
Linha 49: Linha 49:
 
     end do
 
     end do
 
  end do
 
  end do
 
+
 
  tempo = SECNDS(tempo)
 
  tempo = SECNDS(tempo)
 
  print *,"Tempo (s): ",tempo
 
  print *,"Tempo (s): ",tempo
 
+
 
  end
 
  end
  

Edição das 19h57min 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