代码搜索：repeat
找到约 6,690 项符合「repeat」的源代码
代码结果 6,690
www.eeworm.com/read/358751/10180269
pas stamps.pas
{
ID:maigoak1
PROG:stamps
}
program stamps;
const
maxn=50;
maxvalue=2000000;
var
fin,fout:text;
q:array[0..maxvalue]of longint;
need:array[0..maxvalue+1]of byte;
value:array[
www.eeworm.com/read/358751/10180322
pas frac1.pas
{
ID:maigoak1
PROG:frac1
}
program frac1;
const
maxn=160;
type
frac=record
a,b:integer;
end;
var
fin,fout:text;
heap:array[1..maxn*2+1]of frac;
n,i,p:integer;
t:frac
www.eeworm.com/read/162897/10259754
pas repeattest.pas
program repeattest;
const nr = 10;
var i:integer;
c:char;
begin
i:=0;
repeat
begin
print(i,",");
i:=i+1;
end
until i = 10;
read(c);
end.
www.eeworm.com/read/354468/10351503
lst fmq.lst
A51 MACRO ASSEMBLER FMQ 09/21/2005 15:32:25 PAGE 1
MACRO ASSEMBLER A51 V6.12
OBJECT MODULE PLACED IN .\FMQ.OBJ
ASSEMBLER IN