代码大全

FOREVER

{

...

}

Pascal while
Pascal goto exit goto exit
Pascal

Pascal

while(True)
begin
{infinite loop}
...
end;

Pascal C for i:=-i to 999
9999

C for C for

C for
C for

while for C for for
while
C for while

/* read all the records from a file */

for(rewind(InFile).RecCount = 0; !feof(InFile); RecCount++)
{
fgets(InputRec[RecCount-1], MAX_CHARS, InFile);
}

C for for

for
fgets RecCount
RecCount fgets
RecCount
for while