#Ruby
n = gets
a = gets # пластик
b = gets # стекло
c = gets # возврат
litrov = 0
if a < b-c
litrov = n/a
else
while (n >= a or n >= b)
if n >= b
n -= b-c
else
n -= a
end
litrov += 1
end
end
p litrov
Скажите пожалуйста, какой вам нужен паскаль. Сразу же - я пишу на delphi
1536/3072=4 бита
Алфавит содержит 16 символов
Вот, скачай и посмотри. Формулу написал.
Так как результат вычислений надо получить в десятичной системе счисления, то переведем все числа, которые нам даны, в десятичную систему счисления. Затем найдем значение выражения, как принято в математике.