代码搜索:continue

找到约 10,000 项符合「continue」的源代码

代码结果 10,000
www.eeworm.com/read/103672/15726814

for sub bupd.for

SUBROUTINE BUPD(N,ME,MI,M,NAMAX,X,NEWX,OGRA,CGRA, * U,B,S,Y,BS,LG,LGNEW,W3,W4,W5,GRAD,IT,NG) DOUBLE PRECISION X(N),NEWX(N),OGRA(N),CGRA(NAMAX,M),U(M), * B(NAMAX,M),LG(N),LGNEW
www.eeworm.com/read/103672/15726816

for sub auxqp.for

SUBROUTINE AUXQP(N,ME,MI,M,NA,MEA,MA,NAMAX,CGRA,RHS,OGRA,B,PPRA) DOUBLE PRECISION CGRA(NAMAX,M),RHS(M),OGRA(N),B(NAMAX,N),PPRA, * SMALL DATA SMALL/1.0D-3/ WRITE(6,100) 100 FO
www.eeworm.com/read/103672/15726817

for sub bwdsub.for

SUBROUTINE BWDSUB(N,NAMAX,D,TRANS,W) DOUBLE PRECISION D(NAMAX,N),W(N) LOGICAL TRANS IF (TRANS)GOTO 3 DO 2 I=N,1,-1 DO 1 J=I+1,N W(I)=W(I)-D(I,J)*W(J) 1 CONTINUE W(I)=W(I)/D(I,I)
www.eeworm.com/read/103672/15726820

for sub check.for

SUBROUTINE CHECK(N,ME,MI,M,NAMAX,X,CFUN,CGRA,CGRA1, * D1,AK,W0,W1,W2,W3,W4,CON1,GRAD,CORR,NF,NG) DOUBLE PRECISION X(N),CFUN(M),CGRA(NAMAX,M),D1(N),AK(NAMAX,M), * W0(N),W1(
www.eeworm.com/read/103443/15732262

cpp dowhlcmp.cpp

//这个程序在本书所带软盘中,文件名为DOWHLCMP.CPP //这个程序保证只有输入n或N时,才停止程序的执行。 //这个程序可以是一个大程序的一部分。 #include void main(void) { char ans; do { cout
www.eeworm.com/read/103430/15732765

c odd_even.c

#include void main() { int counter; printf("\nEven values\n"); for (counter = 1; counter
www.eeworm.com/read/103430/15732816

c getche.c

#include #include #include void main(void) { int letter; printf("Do you want to continue? (Y/N): "); do { letter = getche(); l
www.eeworm.com/read/103430/15732834

c getchar.c

#include #include void main(void) { int letter; printf("Type Y or N to continue and press Enter\n"); do { letter = toupper(getchar()); } while ((
www.eeworm.com/read/103374/15735896

c odd_even.c

#include void main() { int counter; printf("\nEven values\n"); for (counter = 1; counter
www.eeworm.com/read/103374/15735947

c getche.c

#include #include #include void main(void) { int letter; printf("Do you want to continue? (Y/N): "); do { letter = getche(); l