發表新討論
#8686: 一直wa唉,怎么辦


lamkaihou (ku_Lam)

d266. 退休的福利 -- me | From: [60.246.193.226] | 發表日期: 2014-03-06 20:20
var i,n,s:integer;a:array[1..1000]of integer;
begin
  a[1]:=1;s:=1;
  readln(n);
  for i:=2 to n do
  begin
  a[i]:=a[i-1]*2;
  s:=s+a[i];
  end;
  writeln(s);
end.
#12781: Re:一直wa唉,怎么辦


firzen (心彩)

d266. 退休的福利 -- me | From: [61.231.25.192] | 發表日期: 2017-10-05 21:18
var i,n,s:integer;a:array[1..1000]of integer;
begin
  a[1]:=1;s:=1;
  readln(n);
  for i:=2 to n do
  begin
  a[i]:=a[i-1]*2;
  s:=s+a[i];
  end;
  writeln(s);
end.



請用大數處理

ZeroJudge Forum