代码搜索:repeat
找到约 6,690 项符合「repeat」的源代码
代码结果 6,690
www.eeworm.com/read/358751/10180331
pas secret.pas
{
PROB:secret
LANG:PASCAL
}
program secret;
const
maxn=200;
maxp=40000;
type
edge=record
v1,v2:byte;
len:longint;
flow:shortint;
next1,next2:word;
end;
var
www.eeworm.com/read/358751/10180344
pas ditch.pas
{
ID:maigoak1
PROG:ditch
}
program ditch;
const
max=200;
var
fin,fout:text;
v1,v2:array[1..max]of byte;
cap,flow:array[1..max]of longint;
n,m,i:byte;
ans:longint;
function m
www.eeworm.com/read/159884/10594959
v bench.v
/////////////////////////////////////////////////////////////////////
//// ////
//// JPEG Run-Length testbench
www.eeworm.com/read/468916/6981835
tny sample.tny
int A,B,C,D;
while AD do
if A=1 then A:= B*C+37
else repeat A:
www.eeworm.com/read/458508/7295315
pas shell.pas
Procedure ShellSort ();
var d, i, t : integer;
k : boolean; { пpизнак пеpестановки }
begin
d:=N div 2; { начальное значение интеpвала }
while d > 0 do begin { цикл с yменьшением инт
www.eeworm.com/read/458508/7295319
pas binaryinsertions.pas
for i:= 2 to n do
if a[i-1]>a[i] then
begin x:= a[i];
left:= 1;
right:= i-1;
repeat
sred:= (left+right)div 2;
if a[sred]
www.eeworm.com/read/455017/7379620
vwf gen_1mhz.vwf
/*
WARNING: Do NOT edit the input and output ports in this file in a text
editor if you plan to continue editing the block that represents it in
the Block Editor! File corruption is VERY likely to
www.eeworm.com/read/195529/8145177
h sdl_keyboard.h
/*
SDL - Simple DirectMedia Layer
Copyright (C) 1997-2004 Sam Lantinga
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library Gener
www.eeworm.com/read/246404/12727282
pas ac1191.pas
program tju1191;
const
maxt=1100;
maxw=101;
var
score:array[0..maxt,-1..maxw]of longint;
w,h,a,b,c,d,m,time:longint;
begin
repeat
fillchar(score,sizeof(score),0);
read(w,h)