Написать программу, создающую целочисленный одномерный - вопрос №1516893532 от Demians 17.02.2022 09:45

Question

Информатика: Написать программу, создающую целочисленный одномерный массив из 15 элементов. Заполнить его случайными числами в диапазоне от 0 до 6 и изменить по правилу: элементы под четными индексами увеличить в 3 раза., под нечетными - уменьшить на 10.

Demians · Answer

= N-1while i =n-1 do beginI=1WHILE I =N-R=A(1):A(I)=A(I+1):A(I+1)=R r:=a[i];a[i]:=a[i+ 1];a[i+1]:=r;inc(1,2);end;for i:=1 to n do beginwrite(a[i), );end;readkey;Объяснение:если правильно оцени в 5 звезд...