fortran中的Loaded 'ntdll.dll',no matching symbolic information found.用FORTRAN90编程,运行到一半时,闪了一下就退出了.提示是：Loaded 'ntdll.dll',no matching symbolic information found.Loaded 'C:\WINDOWS\system32\kernel32.dll',no m

来源：学生作业帮助网编辑：作业帮时间：2024/11/17 08:49:32

fortran中的Loaded 'ntdll.dll',no matching symbolic information found.用FORTRAN90编程,运行到一半时,闪了一下就退出了.提示是：Loaded 'ntdll.dll',no matching symbolic information found.Loaded 'C:\WINDOWS\system32\kernel32.dll',no m
fortran中的Loaded 'ntdll.dll',no matching symbolic information found.
用FORTRAN90编程,运行到一半时,闪了一下就退出了.
提示是：
Loaded 'ntdll.dll',no matching symbolic information found.
Loaded 'C:\WINDOWS\system32\kernel32.dll',no matching symbolic information found.
The thread 0xFD4 has exited with code 0 (0x0).
The program 'E:\work\program\Debug\sj0.exe' has exited with code 0 (0x0).
这是怎么回事啊,要怎么改啊
程序如下：
program frequency
implicit none
REAL N,ZH,ZL,F0,FB,F1,AA,BB,CC,FH,FL
REAL KAOH,KBOH,KA1H,KAOL,KBOL,KA1L
real C,B0
WRITE(*,*)"请输入N和ZH"
read(*,*) N,ZH
FH=(N*ZH)/60
write(*,*) "FH=",FH
WRITE(*,*)"请输入 B0"
read(*,*) B0
WRITE(*,*)"请输入 F0,FB,F1"
read(*,*) F0,FB,F1
C=(real(N)/60.0)**2*B0
AA=sqrt(F0**2+C)
BB=sqrt(FB**2+C)
CC=sqrt(F1**2+C)
KAOH=(AA-FH)*100/FH
KBOH=(BB-FH)*100/FH
KA1H=(CC-FH)*100/FH
write (*,*) "AA=",AA
write (*,*) "BB=",BB
write (*,*) "CC=",CC
write (*,*) "KA0H=",KAOH
write (*,*) "KB0H=",KBOH
write (*,*) "KA1H=",KA1H
WRITE(*,*)"请输入 ZL"
read(*,*) ZL
FL=(N*ZL)/60
write (*,*) "FL=",FL
KAOL=(AA-FL)*100/FL
KBOL=(BB-FL)*100/FL
KA1L=(CC-FL)*100/FL
write (*,*) "KA0L=",KAOL
write (*,*) "KB0L=",KBOL
write (*,*) "KA1L=",KA1L
end
刚学着编程,运行到 read(*,*) ZL就没了