! Program to read a number
! Fortan Programming
PROGRAM READNUM
WRITE(*, *)'Enter a number'
READ(*, *)READ1
WRITE(*, *)'The number is:',READ1
END PROGRAM READNUM

Embed on website

To embed this project on your website, copy the following code and paste it into your website's HTML: