gh21665.f90
| 190 B | Satir:
0
| f90
Geri
module fortfuncs implicit none contains subroutine square(x,y) integer, intent(in), value :: x integer, intent(out) :: y y = x*x end subroutine square end module fortfuncs
Kaydet
Ctrl+S ile kaydet