代码搜索：parameter
找到约 10,000 项符合「parameter」的源代码
代码结果 10,000
www.eeworm.com/read/221868/14716706
f90 ex0707.f90
program ex0707
implicit none
integer, parameter :: row = 2
integer, parameter :: col = 2
integer :: m(row, col)
integer r ! 用来指定row
integer c ! 用来指定column
data ((m(r,c), r=1, 2), c=
www.eeworm.com/read/221868/14716713
f90 ex0601.f90
program ex0601
implicit none
integer counter
integer, parameter :: lines=10
! counter
www.eeworm.com/read/221868/14716726
f90 ex0602.f90
program ex0602
implicit none
integer, parameter :: limit=10 ! 计数器的上限
integer counter ! 计数器
integer :: ans = 0 ! 拿来累加使用
do counter=2, limit ,2
ans = ans + counter
end do
www.eeworm.com/read/221868/14716728
for ex0602.for
PROGRAM ex0602
IMPLICIT NONE
INTEGER limit
PARAMETER(limit=10)
INTEGER counter
INTEGER ans
DATA ans /0/
DO 100, counter=2, limit, 2
100 ans = ans + counter
WRITE(*,*) ans
www.eeworm.com/read/221868/14716734
f90 ex0604.f90
program ex0604
implicit none
integer, parameter :: limit=10 ! 计数器的上限
integer counter ! 计数器
integer :: ans = 0 ! 拿来累加使用
counter = 2 ! 设定计数器初值
do while( counter
www.eeworm.com/read/221868/14716783
f90 ex0904.f90
program ex0904
implicit none
integer, parameter :: fileid = 10
logical alive
character(len=20) :: filename;
write(*,*) "filename:"
read(*,"(A20)") filename
inquire(file=fil
www.eeworm.com/read/221868/14716836
f90 ex0912.f90
program ex0912
implicit none
integer, parameter :: fileid = 10
character(len=20) :: filename = "list.bin"
integer player
real :: hit(9) = (/ 3.2, 2.8, 3.3, 3.2, 2.9, 2.7, 2.2, 2.3, 1.
www.eeworm.com/read/221868/14716857
for ex0515.for
PROGRAM ex0515
IMPLICIT NONE
INTEGER I
INTEGER N
PARAMETER(N=10)
DATA I /0/
10 WRITE(*, '(1X,A3,I2)' ) 'I=',I
I=I+1
IF ( I .LT. N ) GO
www.eeworm.com/read/221868/14717030
f90 ex0429.f90
program ex0429
implicit none
real pi
parameter(pi=3.14159)
write(*,"(F4.2)") sin(pi/6)
end
www.eeworm.com/read/221858/14717532
txt 坐标转换的源代码.txt
// WGS2GK.CPP : C++ version of Ottmar Labonde's WGSDHDN3.PAS with CPU time measurement
// compile with MS Visual C++ version 6.0 or do the necessary modifications for your compiler
//
// Conversion