280 条题解
-
0弓长金金金 LV 3 @ 2008-09-28 20:40:14
我只是来找自信的
找点简单的编编也好
100 oh yeah!! -
02008-09-25 19:53:26@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms我看见海平面上升了~~~~~~一次AC
-
02008-09-24 22:22:58@
只有40分
var
a:array[1..13] of integer;
i,s,q,g:integer;
begin
for i:=1 to 12 do readln(a[i]);
for i:=1 to 12 do
begin
q:=300;
s:=q-a[i]+s;
if (s>100) or (s=100) then begin s:=s-100*(s div 100); g:=g+(s div 100); end;
if (s+300 -
02008-09-22 18:17:11@
#include
#include
#include
using namespace std;
int main()
{int max,t,i,save,y;
for(i=1;i -
02008-09-22 18:05:51@
#include
#include
#include
using namespace std;
int main()
{
int t,i,max=0,save=0,y;
for(i=1;i -
02008-09-21 21:21:12@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
program chuxu;
var
a:array[1..12]of longint;
chu,mo,cun,i:longint;
begin
for i:=1 to 12 do readln(a[i]);
chu:=0; mo:=0; cun:=0;
for i:=1 to 12 do
begin
chu:=chu+300; mo:=chu-a[i]; if mo0) then
begin cun:=cun+(mo div 100)*100; mo:=mo mod 100; end;
chu:=mo;
end;
if mo -
02008-09-21 13:58:16@
#include
int main(){
int i;
long save=0,now=0,cost;
for (i=1;i -
02008-09-20 20:31:10@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案错误...程序输出比正确答案长
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案错误...程序输出比正确答案长
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分:80 有效耗时:0msvar
a:array[0..13] of longint;
i,j,x,y,z,n:longint;
begin
for i:=1 to 12 do
readln(a[i]);
for i:=1 to 12 do begin
n:=n+300;
n:=n-a[i];
if n0 then begin x:=x+y;n:=(n-y*100); end;
end;
if z1 then writeln(n+(x*120))
end.?????????????????????????????????
-
02008-09-20 12:07:27@
var i,sy,ys,ck:longint;
begin
for i:=1 to 12 do
begin
sy:=sy+300;
read(ys);
sy:=sy-ys;
if sy -
02008-09-18 20:22:46@
var
s,m,n,i,t,j:integer;
a:array[1..12] of integer;
b:array[1..12] of integer;
f:boolean;
begin
s:=0;n:=300;t:=0;j:=0;f:=false;
for i:=1 to 12 do begin
readln(m);
inc(t);
if n+j-m -
02008-09-17 18:56:36@
编译通过...
├ 测试数据 01:答案错误...程序输出比正确答案长
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案错误...程序输出比正确答案长
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案错误...程序输出比正确答案长
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案错误...程序输出比正确答案长
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案错误...程序输出比正确答案长
├ 测试数据 10:答案错误...程序输出比正确答案长
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分:40 有效耗时:0ms -
02008-09-13 14:50:09@
#include
using namespace std;
const int money=300;
int main()
{
bool check;
int a[12];
int i,j,n,m;
for(i=0;i>a[i];
}
n=0;
m=0;
check=true;
for(i=0;i -
02008-09-07 19:03:03@
唉,晕,这么简单的题作了2个小时记得12月的要夹在后面
我的代码,很丑
main()
{
long s,i,d,e,j=0,m=0,flag=0,f,M;
for(i=1;i -
02008-09-04 20:44:09@
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms
最后 要用截尾,*1.2 后是一个小数
一直没发现 WA了2次 555`\
`` -
02008-08-30 21:17:03@
太简单了,一次性AC
-
02008-08-29 16:16:05@
简单
-
02008-08-21 15:59:57@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0msvar i,j,n,p,s:integer; sum:real;
begin
s:=0;p:=0;
for i:=1 to 12 do
begin
readln(n);
s:=s+300-n;
if s -
02008-08-19 16:46:12@
编译通过...
├ 测试数据 01:答案正确... 0ms
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案正确... 0ms
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案正确... 0ms
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案正确... 0ms
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案正确... 0ms
├ 测试数据 10:答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分:100 有效耗时:0ms -
02008-08-17 09:59:56@
呵呵,有进步半年前每通过的,今天一编就Ac
-
02008-08-11 10:46:55@
├ 测试数据 01:答案错误...程序输出比正确答案长
├ 测试数据 02:答案正确... 0ms
├ 测试数据 03:答案错误...程序输出比正确答案长
├ 测试数据 04:答案正确... 0ms
├ 测试数据 05:答案错误...程序输出比正确答案长
├ 测试数据 06:答案正确... 0ms
├ 测试数据 07:答案错误...程序输出比正确答案长
├ 测试数据 08:答案正确... 0ms
├ 测试数据 09:答案错误...程序输出比正确答案长
├ 测试数据 10:答案错误...程序输出比正确答案长
?????????????????????????????