Tera
6 год назад
При помощи генератора случайных чисел задать одномерный А [10], состоящий из 10 целых чисел. Вывести его на экран через пробел, затем вывести измененные массив. (У всех элементов исходного массива поменять знак на противоположный.) В исходном массиве числа лежат на интервале [-5 ; 5]. Помогите пожалуйста!
ОТВЕТЫ
Юрлов
Jul 2, 2019
Const n = 10;
var a: array[1..n] of integer;
i: integer;
begin
randomize;
writeln(массив:);
for i:=1 to n do
begin
a[i]:=random(-5,5);
write(a[i], );
a[i]:=-a[i];
end;
writeln;
writeln(новый массив:);
for i:=1 to n do write(a[i], );
end.
var a: array[1..n] of integer;
i: integer;
begin
randomize;
writeln(массив:);
for i:=1 to n do
begin
a[i]:=random(-5,5);
write(a[i], );
a[i]:=-a[i];
end;
writeln;
writeln(новый массив:);
for i:=1 to n do write(a[i], );
end.
117
