Ограничение по времени: 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 str, s, s1, s2, s3: string; i: integer; begin str: ='êîìïèëßòîð'; s: =str[3]+str[2]+copy(str, 8, 3); writeln(s); s: =copy(str, 1, 3)+str[2]+str[1]; writeln(s); s: =copy(str, 4, 3)+str[2]+str[length(str)-2]; writeln(s); s1: ='ìàíäàðèí'; s2: ='ìîäà'; s3: ='ìàê'; s: =copy(s3, 3, 1)+copy(s2, 2, 1)+copy(s1, 1, 4)+copy(s2, 2, 1)+copy(s1, length(s1)-2, 1); writeln(s); writeln('vvedite stroku: '); readln(str); for i: =1 to length(str) do if str[i]=' ' then str[i]: ='_'; writeln(str); end.
Var n, i, mn: integer; a: array [1..10] of integer; begin writeln('vvedite massiv'); for i: =1 to 10 do readln(a[i]); writeln('ishodnii massiv'); for i: =1 to 10 do write(a[i],' '); writeln(); mn: =1; for i: =1 to 10 do if a[mn]> a[i] then mn: =i; for i: =1 to 10 do a[i]: =a[i]*mn; 5 writeln('massiv posle obrabotki'); for i: =1 to 10 do write(a[i],' '); writeln(); end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
6. Перевести в ДВОИЧНУЮ систему счисления: а) 5810 б) 3910 в) 3310
Автор: zaravshan20134
Программа, которая сравнит 4 числа и выведет наибольшее
Автор: veraplucnika
Перевести число из одной системы счисления в другую 10010101002 →x 10
Автор: pokupatel688
Информатика! алгоритм сказки "репка"
Автор: versalmoda2971
Поогите составить загадки с отгадками телефон стол дискета
Автор: Pavlushina-Novikova