|
|
вернуться в форумmine program segments; var i,j:integer; a,b:array[-10000]of integer; begin readln(n); for i:=1 to n do read(a[i]); readln(b[i]); writeln(n-1); for i:=1 to n-1 do write(a[i]+b[i],' '); end. From REAL Nemets Ilya(12877): Thank you for thinking about me, my foolish fan! I don't yet know, who are you, but I already know, that you are FOOL! |
|
|