Program mas; var i:integer; a:array[1..10] of integer begin for i=1 to 10 do begin readln(a[i]); end; for i=2 to 10 do begin writeln(a[i]); i:=i+1; end; end.