RosettaCodeData/Task/String-prepend/Fortran/string-prepend-2.f

6 lines
107 B
FortranFixed
Raw Permalink Normal View History

2016-12-05 22:15:40 +01:00
CHARACTER*66 TEXT
TEXT = "World!"
TEXT = "Hello "//TEXT
WRITE (6,*) TEXT
END