!Give the value of x0 and n here !where x0 is initial value and n is number of iteration !Output is stored in fort.50 PROGRAM PROBLEM !1 implicit real*8(a-h,o-z) x0=1.9 n=50 DO i1=1,n WRITE(50,*)i1,x0 x0new=x0**2d0 x0=x0new END DO END