Дана последовательность из n действительных чисел.найти порядковый номер и само число,которое наиболее близко к заданному числу.
(можно написать программку на паскале)

Mmamagadzhieva Mmamagadzhieva    1   25.11.2019 16:30    0

Ответы
zeka27 zeka27  10.10.2020 15:48

===== PascalABC.NET =====

begin

 var n := ReadInteger('n =');

 var a := ArrRandomReal(n, -10, 10);

 a.Println;

 var x := ReadReal('Что ищем?');

 var m := a.Select((v, i) -> (Abs(v - x), i)).MinBy(p -> p[0])[1];

 Println(a[m]);

end.


Дана последовательность из n действительных чисел.найти порядковый номер и само число,которое наибол
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика