代码搜索：until
找到约 4,232 项符合「until」的源代码
代码结果 4,232
www.eeworm.com/read/229768/14317663
asm tx1to10.asm
;====================================================================
;
; Author : ADI - Apps
;
; Date : March 2002
;
; File : Tx1to10.asm
;
; Hardware : ADuC831
www.eeworm.com/read/125994/14452805
asm psmons.asm
;********************************************************************
;
; Author : ADI - Apps www.analog.com/MicroConverter
;
; Date : 12 February 2001
;
; File
www.eeworm.com/read/122655/14677354
+=
首先.
你直接
用tj filename就可以执行filename这个VB程序了
1.变量
本VB只支持整数变量Integer
譬如你可以 Dim A As Integer定义一个变量
2.demo还没有长量
3.语句
本VB支持IF Then
可以有if a>b then
if a=b then
if a
www.eeworm.com/read/287823/8666965
c ssp.c
/*****************************************************************************
* ssp.c: SSP C file for Philips LPC214x Family Microprocessors
*
* Copyright(C) 2006, Philips Semiconductor
www.eeworm.com/read/383734/8922577
txt 算法.txt
求两个数的的公约数：
while n≠0 do
r=m mod n
m=n
n=r
return m
顺序查找
sequentiasearch(A[0...n-1],k)
i=0
while i
www.eeworm.com/read/283405/9022383
c ssp.c
/*****************************************************************************
* ssp.c: SSP C file for Philips LPC214x Family Microprocessors
*
* Copyright(C) 2006, Philips Semiconductor
www.eeworm.com/read/184327/9109432
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)
www.eeworm.com/read/184327/9109585
pas ac1108.pas
program tju1108;
const
maxn=100000;
var
a,b:array[0..maxn+1]of longint;
n,i,x,ans,l,r:longint;
begin
repeat
read(n);
for i:=1 to n do begin
read(x);b[x]:=i;
end;
www.eeworm.com/read/184327/9109653
pas ac1160.pas
program tju1160;
var
s:string;
c:char;
x:extended;
k,a:longint;
begin
repeat
s:='';
repeat
read(c);
if c=' ' then break;
s:=s+c;
until false;
www.eeworm.com/read/184327/9109852
pas ac1036.pas
program tju1036;
const
maxcount=1528;
var
q:array[0..maxcount]of qword;
p1,p2,p3,f1,f2,f3,r,i:integer;
a,b,c:qword;
begin
repeat
read(p1,p2,p3,i);
if p1>p2 then begin r:=p1