请问题目的测试数据为什么上传不上去,一直是上传中= =
真的非常急,请快点回复!
@845209853UFO 不能改的。否则洛谷会大乱(记录等等都要变)
为什么不能像别的Oj一样把测试数据显示出来呢?
题目搜索栏对回车没有反应,让常年习惯于能不用鼠标就不用鼠标的……
var
s1,s:ansistring;
a,b,c:array[1..1100] of longint;
i,la,lb,jw,j,sum:longint;
begin
readln(s);
readln(s1);
la:=length(s1);
lb:=length(s);
for i:=1 to la do a[la-i+1]:=ord(s1[i])-48;
for i:=1 to lb do b[lb-i+1]:=ord(s[i])-48;
for i:=1 to la do
begin
for j:=1 to lb do
begin
c[i+j-1]:=c[i+j-1]+a[i]*b[j]+jw;
jw:=c[i+j-1] div 10;
c[i+j-1]:=c[i+j-1] mod 10;
end;
if jw<>0 then c[i+lb]:=jw;
jw:=0;
end;
la:=la+lb;
while (c[la]=0)and(la>1) do
begin
dec(la);
inc(sum);
if sum>10000000 then break
end;
for i:=la downto 1 do write(c[i]);
end.
p1303,为什么tle? 我发现pascal在洛谷上经常会莫名其妙tle,不知是我代码问题还是什么?
主页的显示怪怪的(对,就是累计通过的那个统计表),日月傻傻分不清,浮动窗口的日月好像搞错了.......
@ zhych 我贴错代码了,删了while循环也超时,上次没循环没递归还超时