• Вопрос по информатике:

    Ограничение по времени: 1 секунда
    ограничение по памяти: 64 мегабайта
    стас собрался в поход и решил взять с собой финтифлюшку (очень полезная в походе вещь). но у стаса есть несколько финтифлюшек разного объёма. стас хочет взять финтифлюшку максимального объёма, но, к сожалению, его нерезиновый рюкзак уже не вместит вещь по объёму большую V. помогите стасу сделать правильный выбор.
    формат входных данных:
    на вход программе подаётся 2 целых числа: N (1<=N<=10000) (<= это больше либо равно) - количество имеющихся у стаса финтифлюшек, и V (1<=V<=100000) - объём, который может вместиться в рюкзак.
    затем следует последовательность из N чисел - объёмы финтифлюшек стаса.
    формат выходных данных
    выведите объём финтифлюшки, которую возьмёт с собой стас.
    напишите начало и конец пожалуйста
    mx:=0;
    for i:=1 to n do
    if (f[i]>mx) and (f[i]

    • Автор:

      jakobe

  • 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.

    • Отвечал:

      bram3tkc
    • 0

    Ответов нет, но ты это испарвиш!

Еще 4 ненужных тебе вопроса, но это важно для поиска