(Паскаль)2.Заполнить с клавиатуры массив из 10 элементов. Если минимальный элемент находится в первой половине массива увеличить каждый четный элемент массива в два раза, в противном случае массив оставить без изменения. ...
(Паскаль)2.Заполнить с клавиатуры массив из 10 элементов. Если
минимальный элемент находится в первой
половине массива увеличить каждый четный элемент массива в два раза, в противном случае массив
оставить без изменения. Вывести новый
массив на экран в виде строки.
Гость
Ответ(ы) на вопрос:
Гостьprogram chik3;
var a:array[1..1000]of integer;
i,min,l:integer;
begin
for i:=1 to 10 do
begin
read(a[i]);
end;
min:=a[1];l:=1;
for i:=2 to 10 do
begin
if(a[i]
Не нашли ответ?
Похожие вопросы