当年tju的a+b problem有一个很王道的代码

记得是这样的

begin writeln(69) end.

记着，只能用longint以上的东东

我提交了10次,寒,只记一次对

var a,b:longint;

begin

readln(a,b);

writeln(a+b);

end.

program sum

var x,y:integer;

begin

readln(x,y);

writeln(x+y);

end

program a;

var x,y:integer;

begin

readln(x,y);

writeln(a+b);

end.

program Plus;

var a,b:longint;

begin

readln(a,b);

writeln(a+b);

end.

各位可以把它想象成高精度来做会比较有趣一些.........

好……题……

增……强……自……信……

var

i,j:longint;

begin

read(i,j);

write(i+j);

end.

program plus;

var

a,b:integer;

begin

read(a,b);

writeln(a+b);

end.

problem 1

var a,b,c:integer;

begin

read(a,b);

c:=a+b;

writeln('c',c);

end.

我错了吗?

program 1

var a,b:longint;

begin

readln(a,b);

writeln('a+b',a+b)

end.

program a

var a,b:integer;

begin

readln(a,b);

writeln(a+b);

end.

谁能够想出最麻烦的方法做？

越麻烦越说明你够行！

我提交第一题被封号了。。。

var a,b:longint;

begin

read(a,b);

write(a+b);

end.

program kl;

var

a,b:LONGINT;

begin

read(a,b);

write(a+b);

end.

var a,b:longint;

begin

read(a,b);

write(a+b);

end.

program Plus;

var a,b:longint;

begin

readln(a,b);

writeln(a+b);

end.