Here's the question you clicked on:

55 members online
  • 0 replying
  • 0 viewing

gerryliyana

  • 3 years ago

I need help (about fortran languange).., please check my script..,

  • This Question is Closed
  1. gerryliyana
    • 3 years ago
    Best Response
    You've already chosen the best response.
    Medals 0

    program value implicit none real::a,b,d,x read*,a read*,b read*,d if(a .ne. 0.0)then if (d<0.0)then write(*,*)'Invalid input data d negative' else x=b*sqrt(d)/a end if else write(*,*)'Invalid input a zero' end if print*,x end program value

  2. venkat_sastry
    • 3 years ago
    Best Response
    You've already chosen the best response.
    Medals 0

    Have you tried compiling?

  3. Not the answer you are looking for?
    Search for more explanations.

    • Attachments:

Ask your own question

Sign Up
Find more explanations on OpenStudy
Privacy Policy