Pascal написать программу обработки массива : определить минимальный элемент массива. сформировать массив а по формуле ai=xi-xmin

обожеэтовкдья обожеэтовкдья    2   01.10.2019 15:00    1

Ответы
ритттт ритттт  09.10.2020 07:58
PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var n := ReadInteger('Количество элементов массива:');

 var x := ReadArrInteger('Введите массив Х:', n);

 var xMin := x.Min;

 var a := x.Select(t -> t - xMin).ToArray;

 a.Println

end.

ПримерКоличество элементов массива: 5Введите массив Х: -18 42 0 -52 14034 94 52 0 192
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика