/*Tydus的无变量声明一句话版，还有待提高，有时间再想*/

#include

int main(_){

return scanf("%d%d",(short*)&_,((short*)&_)+1),printf("%d",(_>>16)+_&0xffff),0;

}

顺便来一句，gcc牛人，我都没想到……

那我也改一下好了

int main(){

return scanf("%d%d",(short*)&_,((short*)&_)+1),;

}

编译通过...

├ 测试数据 01：运行时错误...|错误号: 1758480772

├ 测试数据 02：运行时错误...|错误号: 372704355

├ 测试数据 03：运行时错误...|错误号: 569392414

├ 测试数据 04：运行时错误...|错误号: 1417242975

├ 测试数据 05：运行时错误...|错误号: 1870944835

├ 测试数据 06：运行时错误...|错误号: 1460748855

├ 测试数据 07：运行时错误...|错误号: 861544890

├ 测试数据 08：运行时错误...|错误号: 1005143206

├ 测试数据 09：运行时错误...|错误号: 1860057300

├ 测试数据 10：运行时错误...|错误号: 1141050567

---|---|---|---|---|---|---|---|-

Unaccepted 有效得分：0 有效耗时：0ms

数据分析完毕，还好都是16位的，要32位还要提交两回-_-：

26832 18820

5687 1123

8688 15646

21625 26975

28548 23107

22289 16951

13146 8634

15337 17574

28382 14548

17411 3271

#include

void main()

{

int i,j,m;

scanf("%d,%d",&i,&j);

m=i+j;

printf("%d",m);

}

输出的结果是两个数的和；

先运行（a+b）；

.....

program jia;

var x,y,s:longer;

begin

writeln('x=','y=');readln(x,y);

s=x+y;

write('s=',s);

end.

#include

int Sum(int a,int b);

void main()

{

int x,y;

printf("请输入第一个数:\n");

scanf("%d",&x);

printf("请输入第二个数：\n");

scanf("%d",&y);

printf("两个数的和=%d\n",Sum(x,y));

}

int Sum(int a,int b)

{

int sum=0;

sum=a+b;

return sum;

}

program p1000;

var

a,b:integer;

begin

readln(a,b);

writeln(a+b);

end.

program skyline;

var

x,y:longint;

begin

readln(x,y);

writeln(x+y);

end.

//for beginngers

program a;

var x,y,c:longint;

begin

readln(x,y);

writeln(c);

end.

var a,b:integer;

begin

repeat

readln(a,b);

until(a>=0)and(b>=0);

write(a+b);

end.

program kjs;

var a,b:longint;

begin

read(a,b);

write(a+b);

end.

看了gcc的题解才知道原来偷数据可以这么偷

PS:严重BS某些刷屏者，VIJOS简直成小说下载站了

program sum;

var

a,b:longint;

begin

readln(a,b);

writeln(a+b);

end.

var i,j:longint;

begin

read(i,j);

writeln(i+j);

end.

program sum;

var

x,y:integer;

begin

readln(x,y);

writeln(x+y);

end.

Program qh;

Var :X,Y;integer;

begin

read(X,Y);

write(X+Y);

end.

编译通过...

├ 测试数据 01：答案正确... 541ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 228ms

├ 测试数据 04：答案正确... 588ms

├ 测试数据 05：答案正确... 650ms

├ 测试数据 06：答案正确... 462ms

├ 测试数据 07：答案正确... 212ms

├ 测试数据 08：答案正确... 369ms

├ 测试数据 09：答案正确... 494ms

├ 测试数据 10：答案正确... 197ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：3741ms

var

a,b:longint;

i:extended;

begin

read(a,b);

i:=0.0004;

repeat

i:=i+0.0004;

until abs(i-a-b)

膜拜voyagec2大牛！

小菜有礼了！

var

a, b: longint;

begin

readln(a, b);

writeln(a + b);

end.

var

a,b:integer;

procedure init;

begin

assign(input);

assign(output);

reset(input);

rewrite(output);

end;

procedure outit;

begin

close(input);

close(output);

end;

begin

read(a,b);

writeln(a+b);

end.

var

a,b:longint;

begin

readln(a,b);

write(a+b);

end.