Fortrano: Malsamoj inter versioj

[nekontrolita versio][nekontrolita versio]
Enhavo forigita Enhavo aldonita
→‎supro: pli konvena bildo
esperantigita ŝablono (Referencoj), +Projektoj, +Bibliotekoj, multaj kosmetikaj ŝanĝoj
Linio 6:
Jen simpla ekzemplo de Fortrana programo:
<syntaxhighlight lang=" Fortran">
PROGRAM AVERAGXO
! Komputi la averaĝon de listo da nombroj
!
INTEGER N
REAL X, SUMO, MEZUMO
!
DO
READ *, X
IF (X .GT. 0.0) THEN
!
INTEGER N SUMO = SUMO + X
REAL X, SUMO, MEZUMO N = N + 1
!
DO
READ *, X
IF (X .GT. 0.0) THEN
SUMO = SUMO + X
N = N + 1
ELSE
EXIT
ENDIF
END DO
MEZUMO = SUMO / REAL (N)
PRINT 20, MEZUMO
20 FORMAT (1X, 'LA MEZUMO ESTAS ', F6.2)
END PROGRAM AVERAGXO
</syntaxhighlight>
 
== Eksteraj ligiloj ==
{{Projektoj}}
* [http://gcc.gnu.org/fortran GNU Fortran 95]
* {{Dmoz|Computers/Programming/Languages/Fortran}}
Linio 33 ⟶ 34:
 
== Noto ==
{{Referencoj}}
<references/>
{{Bibliotekoj}}
 
[[Kategorio:Programlingvoj]]