摘要：楚王失弓的寓言 楚恭王喜欢打猎，他拥有一把天下著名的宝弓。有一次，他打完猎准备回宫，就将宝弓交由部下保管。一行人在路上走到一半，宝弓不知传到谁的手上不见了。于是大家分头去找，最后还是找不到。楚恭王度量宽大，就说：“别找了！楚王失弓，楚人得之。”　弓既然在楚国境内遗失，将来捡到的想必是楚国人，那么又何必计较呢？ 孔子听说这件事，就说：“何必曰楚？应该说：王失弓，人得之。”这里的“人”是泛指天下人。只要被人捡到，何必计较他是否楚国人呢？由此可见，儒家是主张人文主义的，要普遍肯定每一个人的价值，不因国籍与种族而有任何差别待遇。 接着，老子听说了前面两段话，就说：“何必曰人？应该说：失弓，得之。”弓不 阅读全文

摘要：题目要求：找一个数字x，使得x^x 的位数大于等于n，(x-1)^(x-1)的位数小于nprogram sky;var n:qword;function doing(l,r:qword):qword; var mid,temp1,temp2:qword; begin if l=r then exit(l); mid:=(l+r+1)>>1; temp1:=trunc(mid*(ln(mid)/ln(10)))+1;{计算位数} temp2:=trunc((mid-1)*(ln(mid-1)/ln(10)))+1;{计算x-1的位数} if (temp1>=n) and (te 阅读全文

摘要：{首先，说明一个问题，一个数的大于它开方的质因数最多一个；等于的可以两个，即它开方得到的数是质数的话，即为该数；问题可以这样描述，当一个数筛去小于等于自身开方的数之后就之多只有一个质因数了，详情看程序不妨反证一下，若有第二个，则仅仅这两个数乘起来就比x大了，所以没有第二个}program sky;{筛选法求素数，分解质因数}var i,j,l,tot,x:longint; xx:array[1..100000,1..2] of longint; a:array[1..500000]of longint; v:array[1..500000] of boolean;procedure init; 阅读全文

摘要：procedure doing（x:longint）; begin if x=n+1 then print ; …… …… end; 阅读全文