摘要:
var a,n,m,x,i,ans,b:longint;//ans是车上人数 f:array[1..100] of longint;//f其实是斐波那契数列begin f[1]:=1;//前两个数的值 f[2]:=1; for i:=3 to 23 do/... 阅读全文
posted @ 2016-12-03 08:34
银叶草
阅读(138)
评论(0)
推荐(0)
摘要:
这题其实就是高精乘const maxn=1000;varsum,a:array[0..maxn]of longint;n:longint;procedure init;//读入begin readln(n); a[maxn]:=1;end;procedur... 阅读全文
posted @ 2016-12-03 08:26
银叶草
阅读(187)
评论(0)
推荐(0)
摘要:
begin writeln('192 384 576'); writeln('219 438 657'); writeln('273 546 819');writeln('327 654 981');end. 阅读全文
posted @ 2016-12-03 08:23
银叶草
阅读(125)
评论(0)
推荐(0)