
Волк
5 год назад
Дан линейный массив A[1..N], содержащий целые числа. Найти длину наименьшего отрезка числовой прямой, содержащего все положительные элементы массива. Pascal
ОТВЕТЫ

Bojcho
Oct 24, 2020
begin
var s:=ArrRandom(ReadInteger('n='),-20,99).Println.Where(x->x>0).OrderBy(x->x);
Writeln('Длина отрезка равна ',s.Last-s.First)
end.
374
Смежные вопросы: