一下子搞不懂
解决方案 »
- 关于将excel导入access后身份证号自动变为科学计数法的问题如何解决
- Delphi进销存盘点维护 盘盈亏功能
- 小弟的迷茫、疑惑?
- 如何,实现拖拉功能!!
- 怎样判断一个字符变量ch是否等于字符串的结束标志符。急切
- 有没有 廊坊 或 石家庄 的CSDN用户呀!!!!交流交流呀!!!!!!
- 帮帮忙,教我如何实现计算公式的动态输入吧?
- 怎樣控制字段值的顯示格式﹖如字段值為1245.356﹐要使它顯示為1245.36﹐即保留到小數點后兩位。請高手救救小弟﹗謝謝﹗﹗
- 有人说pascal就是delphi,不知道是不是?fd
- 如何进行两个时间或日期的相减!
- 为了工作,由Delphi改为C++,散。
- 请问现在我有一个文件,我想把文件大小转换为十六进制.如何做?如1_2.png大小为41878,转换后的结果是9c65, 如果写这代码呢?
int BinarySearch(IntArrayType IntArray, int Low, int High, int Target)
{
int Mid, Difference; while (Low <= High)
{
Mid = (Low + High) / 2;
Difference = IntArray[Mid] - Target; if (Difference == 0) // IntArray[Mid] == Target
return Mid;
else if (Difference < 0) // IntArray[Mid] < Target
Low = Mid + 1;
else
High = Mid - 1;
} return -1; // If reach here, Target was not found.
}
//////////////////////////////
Value,{ 需要查找的数据 }
L{ 数据列表最低 },H{ 数据列表最高 },M { 临时保存中间值的变量 }:integer;
ValueList:List for Sorted Data;{ 数据列表,已经排序 }Result:=-1;
if (Value<ValueList[L]) or (Value>ValueList[H]) then exit;
while L<=H do
begin
M:=(L+H) div 2;
if ValueList[M]=Value then
begin
Result :=M;
Break;
end else if ValueList[M]>Value then
H:=M-1
else
L:=M+1;
end;