Сформировать массив, состоящий из 15 элементов, с помощью датчика случайных чисел. получить новый ма

Как организовать работу над заданием 11 класса: - сформировать массив, состоящий из 15 элементов, с помощью датчика случайных чисел. получить новый массив, каждый элемент которого равен увеличенному вдвое соответствующего элемента исходного массива.

 

[Опухший заяцNeoNew]

написать программу на нахождение индекса элемента массива w равного 82 состоящего из 15 элементов образованного случайным образом из промежутка [-78;383)

 

[Enemar]

var

i, j : integer; // объявляем переменные целочисленного типа.

arr : array [1..15] of integer; // объявляем массив.

arr2 : array [1..15] of integer; // объявляем массив.

Begin

for i:= 1 to 15 do // начало цикла для заполнения первого массива.

begin

arr := random(0, 50); // заполняем элемент массива числом из диапазона от 0 до 50.

writeln('arr= ',arr); // вывод текущего элемента массива на экран.

end;

for j := 1 to 15 do // начало цикла для заполнения второго массива.

begin

arr2[j] := arr[j] * 2; // заполняем элемент второго массива удвоенным элементом // из первого массива с тем же индексом.

writeln('arr2= ',arr2[j]); // вывод текущего элемента массива на экран.

end;

end.