C 		ENSIMMÄINEN ESIMERKKI FORTRAN -OHJELMASTA
C 		NÄMÄ ENSIMMÄISET RIVIT OVAT KOMMENTTEJA - TYHJÄ RIVIKIN ON KOMMENTTI

C 		HUOMAA, ETTÄ KOODIRIVIN RAKENNE ON (MAX 80 SARAKETTA):
C----X==================================================================++++++++
C 	MISSÄ 	- ON LAUSENUMERO (VAPAAEHTOINEN) SARAKKEET 1 - 5
C				X ON JATKORIVIN MERKKI JOS TYHJÄ NIIN RIVI EI OLE JATKOA EDELLISEEN
C				= ON FORTRANIN LAUSE SARAKKEET 7 - 72
C				+ = KOMMENTTTEKSTIÄ SARAKKEET 73 - 80 

C		OHJELMAN NIMI - VAPAAEHTOINEN		
		PROGRAM TERVE

C		MUUTTUJIEN ESITTELYT - KAKSI KOKONAISLUKUA JA MERKKIJONO
		INTEGER KERTAA,I
		CHARACTER*6 TULOS

C 		SIJOITETAAN MERKKIJONOVAKIO
		TULOS = 'TERVE!'

C		LUETAAN KOKONAISLUKUMUUTTUJALLE ARVO
		PRINT *,'MONTAKO KERTAA TULOSTETAAN? KIRJOITA POSITIIVINEN KOKONAISLUKU'
		READ *,KERTAA

C		TULOSTETAAN SILMUKASSA ANNETTU LUKUMÄÄRÄ TERVEHDYKSIÄ
		DO 100 I = 1,KERTAA
		PRINT *,TULOS
100	CONTINUE
	
C		OHJELMA LOPPUU AINA ENDIIN
		END