Ограничение по времени: 1 секундаограничение по памяти: 64 мегабайтастас собрался в поход и решил взять с собой финтифлюшку ( полезная в походе вещь). но у стаса есть несколько финтифлюшек разного объёма. стас хочет взять финтифлюшку максимального объёма, но, к сожалению, его нерезиновый рюкзак уже не вместит вещь по объёму большую v. стасу сделать правильный выбор.формат входных данных: на вход программе подаётся 2 целых числа: n (1< =n< =10000) (< = это больше либо равно) - количество имеющихся у стаса финтифлюшек, и v (1< =v< =100000) - объём, который может вместиться в рюкзак.затем следует последовательность из n чисел - объёмы финтифлюшек стаса.формат выходных данныхвыведите объём финтифлюшки, которую возьмёт с собой стас.напишите начало и конец mx: =0; for i: =1 to n doif (f[i]> mx) and (f[i]
var
n,v,max,i : integer;
a : array [1 ..10000] of integer;
begin
writeln('Введите количество финтифлюшек');
read(n);
writeln('Введите объём рюкзака');
read(v);
writeln('Введите объёмы финтифлюшек');
max:=0;
for i:=1 to n do
begin
read(a[i]);
if (a[i]>max) and (a[i]<=v) then
max:=a[i];
end;
writeln(max);
end.