返回首页
语句函数
语句函数的使用如下:
f(x)=x**2-1
g(x)=2*x
write(*,*) f(12),g(i)
函数子程序
函数子程序的使用如下:
program my_add
integer a,b,sum
read(*,*) a,b
sum=my_add(a,b)
write(*,*) sum
end program
function my_add(x,y)
integer my_add
integer x,y
my_add=x+y
end function
子例行程序
子例行程序的使用如下:
program my_add
integer a,b,sum
read(*,*) a,b
call my_add(a,b,sum)
write(*,*) sum
end program
subroutine my_add(x,y,ans)
integer x,y,ans
ans=x+y
end subroutine