Ero sivun ”Fortran” versioiden välillä
[arvioimaton versio] | [arvioimaton versio] |
Poistettu sisältö Lisätty sisältö
p Botti muokkasi: hu:Fortran |
|||
Rivi 84:
READ(*,*) iarvaus
lkm = lkm + 1
IF(iarvaus < luku)THEN
WRITE(*,*) 'Liian pieni arvaus'
ELSE
IF(iarvaus > luku)THEN
WRITE(*,*) 'Liian suuri arvaus'
|