【讨论】CALL MOVTO(INT(X0)

woolan2005

这种写法是否正确啊〉？

苍山负雪

It's OK.
  

2. program main
3.   
4.   real x0
5.   
6.   x0= 1.5
7.   call movto(int(x0))
8.   
9. contains
10.   
11.   subroutine movto(x1)
12.     integer x1
13.     write(*,*) x1
14.   end subroutine movto
15.   
16. end program main

复制代码