WRITE (4,100) 100 FORMAT (1H "THIS IS A SIMPLE EXAMPLE OF A PROGRAM") X=2.5 Y=3.14 Z=X*Y WRITE (4,200) X,Y,Z 200 FORMAT (1H "X="F4.2,"Y="F4.2," X*Y="F4.2) END