Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Blog
exercise
program find_value implicit none real::x=10,y=-45,f if(x>=0.and.y>=0)then f=x+y print*,f else if (x<0.and.y>=0)then f=x**2+y print*,f else if (x>=0.and.y<0)then f=x+y**2 print*,f else f=x**2+y**2 end if end program find_value
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
NEWTON FORWARD DIFFERENT INTERPOLATION
Subroutine problem
hello world
New
Fortran
Summation of 1 to 100 square integer namber
Random walk by using Monte Carlo method
GPA GRADING
Fortran Homework 1
Summation of 1 to 100 integer namber
stackse - search stackoverflow differently
Please log in to post a comment.