Сегодня али в местном магазине сделал покупку за c тенге. он только хотел расплатится и услышал от продавца фразу "без сдачи , молодой человек". у него есть всего n монет достоинств a1, a2, an тенге. определите, сможет ли он расплатится без сдачи. формат входных данных в первой строке входного файла записаны два целых числа c (1 ≤ c ≤ 1000) и n (1 ≤ n ≤ 15) — общая сумма покупки и количство монет у али соответсвенно. во второй строке записаны n целых чисел a1, a2, an (1 ≤ ai ≤ 1000)— достоинства монет али. формат выходных данных в единственной строке выведите слово «yes», если али сможет расплатится без сдачи. иначе, выведите «no»
135
170
Ответы на вопрос:
Var input,output: text; n,i,j,g,nm,ans,t: integer; ara: array[0..1000] of integer; ar,arq: array[0..1000] of integer; ts,sum,a: integer; beginassign(input,'f.in'); reset(input); assign(output,'f.out'); rewrite(output); readln(input,a,n); ans: =10000; for i: =1 to n do begin read(input,ar[i]); ts: =ts+2*ar[i]; end; if ts< a then writeln(output,'-1') else begin ara[1]: =3; for i: =2 to 15 do begin ara[i]: =3*ara[i-1]; end; for i: =1 to ara[n] do begin if arq[n]< 2 then begin inc(arq[n]); sum: =sum+ar[n]; inc(nm); end else begin g: =n; while arq[g]> 1 do begin sum: =sum-ar[g]*arq[g]; dec(nm,arq[g]); arq[g]: =0; dec(g); end; inc(arq[g]); sum: =sum+ar[g]; inc(nm); end; if sum=a then begin if nm< ans then ans: =nm; end; end; if ans> 1000 then writeln(output,'0') else writeln(output,ans); end; close(output); close(input); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
averdarya17.02.2021 04:16
-
2424r23.01.2022 05:08
-
678923415833325.05.2021 03:10
-
artemzuk2001artemzuk31.01.2023 21:47
-
Nastyushon05.06.2022 16:41
-
Gggggggggggg2218.01.2023 15:32
-
vadimrusackeviVadim04.10.2021 21:18
-
VADIMECHE14.05.2023 18:23
-
katekurmakaeva05.09.2022 02:05
-
allahakbar1062p0a3z029.11.2021 03:27
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.