Если кто сможет, помогите. 1)Cформировать и вывести на экран массив из 12 элементов каждые два последовательных элемента которого составлены по следующему правилу: 1-ый элемент равен удвоенному текущему индексу; 2-ой элемент целой части от деления числа на 3. 2)Сформируйте массив В из N элементов с помощью датчика случайных чисел [-10;60]. Получите новый массив, каждый элемент которого равен разности элемента и его индекса.

Магистр PetyaGavrikov, спасибо вам и да прибудет с вами сила.

Пожалуйста.

1)Замечание: не очень понятно какое число надо делить на 3. В программе на 3 делится первый элемент из каждой пары.const n=12;var a:array[1..n] of integer;i:integer;beginfor i:=1 to n div 2 do begin a[2*i-1]:=2*i; a[2*i]:=a[2*i-1] div 3; end;for i:=1 to n do write(a[i],' ');writeln;end.Результат:2 0 4 1 6 2 8 2 10 3 12 4 2)const n=12;var b:array[1..n] of integer;i:integer;beginfor i:=1 to n do begin b[i]:=random(71)-10; write(b[i]:4); end;writeln;for i:=1 to n do begin b[i]:=b[i]-i; write(b[i]:4); end;writeln;end.Пример: 17 54 4 -7 31 33 -6 27 14 59 0 43 16 52 1 -11 26 27 -13 19 5 49 -11 31