sum input by uru

var s,a,i:Word;begin s:=0;for i:=1to 9do begin readln(a);s:=s+a end;write(s)end.\x0d

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page