СРОЧНОС помощью Паскаля:1.В магазине продается мастика в ящиках по 15 кг,17 кг,21 кг. Как купить ровно 185 кг мастики, не вскрывая ящики?Сколькими способами можно это сделать?

СРОЧНО С помощью Паскаля: 1.В магазине продается мастика в ящиках по 15 кг,17 кг,21 кг. Как купить ровно 185 кг мастики, не вскрывая ящики?Сколькими способами можно это сделать?
Гость
Ответ(ы) на вопрос:
Гость
program gt; var a,b,c,k:integer; begin k:=0; for a:=0 to 12 do for b:=0 to 10 do for c:=0 to 8 do if(a*15+b*17+c*21=185)then begin k:=k+1; writeln(a,' ',b,' ',c); end; writeln(k,'-кол-во способов'); end. 185/15=12(приблеженно) 185/17=10 185/21=8 т.е 185 div 21=8 .. выбераем все случаи и находим кол-во так как больше 12 мастика по 15 кг нельзя(будет >185) и 10 по 17 и 8 по 21 то перечислим случаи и найдем решение где выполняется все условие
Не нашли ответ?
Ответить на вопрос
Похожие вопросы