Заполнить массив d(15) случайными числами (-70; 30). заменить элементы массива квадратами их чисел.

program   raf105;

const n= 10;

var  

  a: array[1..n] of integer;

  i: integer;

begin

writeln('исходный массив: ');

for i: =1 to n do

begin

  a[i]: = random(-70,30);

  writeln(a[i]);

end;

writeln('изменённый массив: ');

for i: =1 to n do

begin

  a[i]: = a[i]*a[i];

  writeln(a[i]);

end;

end.

ответ:

#include

#include

using namespace std;

int main() {

srand(time(null));

setlocale(lc_all, "russian");

int d[15];

for (int i = 0; i < 15; i++)//заполение массива случайными числами в диопазоне от -70 до 30

{

  d[i] = rand() % 101 + (-70);

}

for (int i = 0; i < 15; i++)//вывод массива

{

  cout < < d[i] < < " ";

}

cout < < endl;

for (int i = 0; i < 15; i++)//замена элементов массива

{

  d[i] = pow(d[i], 2);

}

for (int i = 0; i < 15; i++)//вывод массива

{

  cout < < d[i] < < " ";

}

cout < < endl;

system("pause");

return 0;

}

объяснение: