! PROGRAM P11 ! ! IMPLICIT NONE PRINT *, 'This is Program >> P11 - Prints a string' ! PRINT *, 'TO-DAY IS WEDNESDAY' STOP END PROGRAM P11OUTPUT:
+--------------------------------------------------+ | 32-bit Power for Lahey Computer Systems | | Phar Lap's 386|DOS-Extender(tm) Version 7.0 | | Copyright (C) 1986-94 Phar Lap Software, Inc. | | Available Memory = 14880 Kb | +--------------------------------------------------+ This is Program >> P11 - Prints a string TO-DAY IS WEDNESDAY
{ Program to demonstrate Printing a message } PROGRAM p11 (input, output); BEGIN writeln ('To-day is Wednesday') END.
Last modified: 21/07/97