Pascal написать программу обработки массива :Определить минимальный элемент массива. Сформировать массив А по формуле Ai=Xi-Xmin
Ответы на вопрос
Ответил Аноним
0
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 140
34 94 52 0 192
Новые вопросы
Русский язык,
2 года назад
Русский язык,
2 года назад
Алгебра,
7 лет назад
Алгебра,
7 лет назад
Геометрия,
9 лет назад