Ero sivun ”Fortran” versioiden välillä

[arvioimaton versio][arvioimaton versio]
Poistettu sisältö Lisätty sisältö
MelancholieBot (keskustelu | muokkaukset)
p Botti muokkasi: hu:Fortran
Rivi 84:
READ(*,*) iarvaus
lkm = lkm + 1
END SUBROUTINE arvaus
SUBROUTINE vertailu
IF(iarvaus < luku)THEN
WRITE(*,*) 'Liian pieni arvaus'
ELSE
IF(iarvaus > luku)THEN
WRITE(*,*) 'Liian suuri arvaus'
Noudettu kohteesta ”https://fi.wikipedia.org/wiki/Fortran