На кондитерской фабрике выпускаются конфеты трех сортов. Известны расходы компонентов (в граммах) на 1 кг каждого сорта и общие запасы, имеющиеся на складе:
"Гвоздика" "Романтика" "Карнавал" Запасы, кг
Какао 310 255 215 125
Сахар 100 70 150 44
Наполнитель 90 175 135 61,5
Установлены такие цены за 1 кг: "Гвоздика" — 180 рублей, "Романтика" — 200 рублей и "Карнавал" — 170 рублей. Сколько килограммов конфет каждого сорта нужно выпустить, чтобы доход фабрики был наибольшим?
В качестве ответа выведите три числа с точностью до первого знака после запятой, разделяя их одинарными пробелами: массу в кг конфет "Гвоздика", "Романтика" и "Карнавал", например, так: 1,1 2,3 0,5.
a,b,d,K,kp:integer;
P:boolean;
Begin
kp:=0;
ReadLn(a,b);
if (a = 1)or(a = 2) then
Begin
kp:=2;
Write(2,' ',3)
end
else if a = 3 then
Begin
kp:=1;
Write(3);
End;
if a < 5 then a:=5
else if a mod 2 = 0 then a:=a+1;
While a<=b do
Begin
K:=Trunc(Sqrt(A));
d:=3;
P:=true;
While d <= K do
Begin
if A mod d = 0 then P:=false;
d:=d+2
End;
if P then
Begin
kp:=kp+1;
Write(' ',a);
End;
a:=a+2
End;
if kp = 0 then Write(0)
End.
Дискретность – процесс решения задачи должен быть разбит на последовательность отдельных шагов.
Понятность. Алгоритм должен быть понятен исполнителю и исполнитель должен быть в состоянии выполнить его команды.
Определенность. Алгоритм не должен содержать команды, смысл которой может восприниматься неоднозначно.
Результативность. Процесс решения задачи должен прекратиться за конечное число шагов и при этом должен быть получен ответ задачи.
Массовость. По одному алгоритму можно решать однотипные задачи