На метеопосту за период наблюдения в n дней была - вопрос №5537489 от hohodge 22.08.2022 10:19

Question

Информатика: На метеопосту за период наблюдения в n дней была получена таблица величины атмосферного давления. записать программу, которая: а)определяет максимальный, минимальный по величине элементы массива и номера соответствующих им дней в массиве; б)определяет среднее значение давления за время наблюдения; в)подсчитывает количество дней, в которые давление превышало заданную величину d; г)сортирует массив по возрастанию; д)выводит исходный, массив и результаты вычислений. для откладки программы исходный

hohodge · Answer

//PascalABC.NET 3.1 сборка 1219begin    var a := ArrRandomInteger(ReadInteger( n = ), 760, 780);     a.Println;    Writeln( Max = , a.Max, № , a.IndexMax + 1);    Writeln( Min = , a.Min, № , a.IndexMin + 1);    Writeln( Avg = , a.Average);    var d := ReadInteger( d = );    Writeln( Count(x , d, ) = , a.Where(x - x d).Count);    a.Sort;    a.Println;end....