Pratical Helloworld
Q1. hello.f90 (filename.f90) program hello implicit none print *, "Hello World!" pause end program Q2. Area.f90 PROGRAM circle_area IMPLICIT NONE !reads a value representing the radius of a circle, !then calculates and writes out the area of the circle. REAL :: radius, area REAL, PARAMETER :: pi=3.141592 READ (*,*) radius area = pi*radius*radius WRITE (*,*) area pause END PROGRAM circle_area Q3. Areacircle.f90 program Calc real :: radius,area real, parameter :: pi = 3.14 print *, "enter ratdius" read *, radius area = pi * radius **2 print *, area pause end program Calc