在你前面有一个长长的阶梯,如果你每步跨2阶,那么最后剩1 阶;如果你每步跨3阶,那么最后剩2 阶;如果你每步跨5阶,那么最后剩4 阶;如果你每步跨6阶,那么最后剩5 阶;如果你每步跨7阶,那么正好走完,一阶不剩,问你这条阶梯最少有多少阶?
解决方案 »
- Clientdataset 问题????????/
- delphi 內存釋放
- 将Handle转化成TMenu?
- Anycell Report中国式报表V1.71已经发布,包含多数源码,最新支持:在Rich文本中插入表达式,可导出Excel、html、rtf等文档格式...
- 为什么在判断state=dsInsert时程序竟然说 Undeclared identifier: 'dsInsert'
- 简单的文件分析处理!
- Delphi+oracle开发,怎么得到oracle库中任一数据表的所有字段名称?
- 关于opc的一个问题—怎样自动查找节点设备?
- 怎样取得系统内安装的输入法名称
- 窗体对象的释放.......
- 信差
- 关于EXCEL有条件导入导SQL的问题。
var
x:integer;
begin
x:=0;
repeat
x:=x+7;
until ((x mod 2=1) and (x mod 3=2) and (x mod 5=4) and (x mod 6=5));
showmessage(inttostr(x));end;
n:Integer;
begin
n:=7;
repeat
n:=n+1;
until ((n-1) mod 2=0) and ((n-2) mod 3=0) and ((n-4) mod 5=0) and ((n-5) mod 6=0) and (n mod 7=0);
ShowMessage(IntToStr(n));
end;结果是119