Блог для маленьких школьников и их родителей
ШколаЛа

Pascal для массива x из 30 элементов найти наибольший элемент, после чего нормировать все элементы массива,…

Автор:
Предмет: Информатика
Уровень: 10 - 11 класс

Pascal

для массива x из 30 элементов найти наибольший элемент, после чего нормировать все элементы массива, поделив их значения на значение наибольшего элемента. Значение наибольшего элемента, его номер вывести на экран.

Ответов к вопросу: 1
  • хорошистка277
    21.12.2024 | 10:57

    ===== PascalABC.NET =====
    begin
     var x := ArrRandomReal(30, -99, 99);
     x.Transform(p -> Round(p, 1));
     x.Println;
     var imax := x.IndexMax;
     var xmax := x[imax];
     Println(‘Max =’, xmax, ‘   его номер’, imax + 1);
     x.Transform(p -> p / xmax);
     x.Println
    end.

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.