Дан целочисленный массив A.Измените все его элементы на противоположные по знаку!!!!помогите плиз язык программирование.На массив

1

Ответы и объяснения

  • Kitsu
  • почетный грамотей
2012-12-24T15:01:54+00:00

var a:array[1..10]of integer;

i:integer;

begin

for i:=1 to 10 do readln(a[i]);

for i:=1 to 10 do a[i]:=-a[i];

for i:=1 to 10 do write(a[i],' ');

end.