Заменить элементы массива на противоположные по знаку и вывести на экран массив заполнить случайными величинами от -50 до 100
82
ОТВЕТЫ
var i,n:integer;
a:array[1..1000] of integer;
begin
write(Write size array: ); readln(n);
for i:=1 to n do
begin
a[i]:=Random(150)-50;
write(a[i]:4, );
end;
writeln;
for i:=1 to n do
begin
a[i]:=a[i]*-1;
write(a[i]:4, );
end;
end.
143
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Гонорат
Картина В . М Васнецова Богатыри стихотворение А . ...
2019-01-23 04:32:23
Мазуров
Определить какой размер занимал бы несжатый видео-файл качества [email protected] ...
2019-01-23 04:31:21
Аверьян
2019-01-23 04:30:43
Nuada
6. Какие из перечисленных пунктов главного меню Windows служит ...
2019-01-23 04:29:23