Написать программу, которая проверяет, образуют ли элементы введенного с клавиатуры массива неубывающую последовательность отрицательных чисел.с++.

#include <iostream>

int main()
{
int length;
bool flag=true;
std::cout<<"Введите длину массива: ";
std::cin>>length;
int *array=new int[length];
for (int i=0;i<length;i++)
{
std::cin>>array[i];
if (i>0)
if (array[i-1]>array[i])
flag=false;
if (array[i]>=0)
flag=false;
}
std::cout<<(flag?"true":"false");
return 0;
}

Частота дискретизации D = 44000 гц
разрядность i = 16 бит
t = 1 мин = 60 сек.
Стереозапись включает в себя 2 дорожки,а значит объем информации увеличивается вдвое, поэтому добавим в конечную формулу коэффициент 2.
Объем информации L =2*D*i*t = 44000*16*60*2=84480000 бит=10560000 байт=10Мбайт.

ответ: одна минута стереозаписи занимает 10Мбайт.

L = 700Мбайт = 734003200 байт
D = 44000 гц
i=16 бит = 2 байта
(тип звукозаписи - стерео => добавляется коэффициент 2)
t=L/(D*i*2)
t = 734003200/(2*44000*2) = 4170,47 сек = 69,5 мин.

ответ: 69,5 минут максимальная продолжительность стереозаписи на диске 700 Мбайт 

У меня получилось вот что (смотри скриншоты листинга программы и результата работы этой программы):
uses Crt;
const n = 10;
var A: array [1..n] of integer; 
        i: integer;
begin 
ClrScr; 
Randomize; 
WriteLn ( ' Massiv I: '); 
for i:=1 to n do 
    begin     
          A[i] := 1+random(n);  
          Write (A[i]:4); 
    end; 
WriteLn; WriteLn ( ' Massiv II: '); 
for i:=1 to n do 
    begin   
           if (A[i] mod 2 =0) then A[i]:=0 else A[i]:=3*A[i];     
           Write (A[i]:4); 
   end;
ReadLn;
end.