Mudanças entre as edições de "Fortran"
(→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
