Расставляем соответствия по формату
1-d
2-c
3-b
4-a
Ответ 7 стаканов.
подсчитал методом подбора.
первое взвешивание:2 стакана и 1 тарелка= 1 кувшин. если представить тарелку как 5 стаканов то 1 кувшин =7 стаканов (2+5)
второе взвешивание : 2 кувшина и стакан = 3 тарелки. по пред идущему взвешиванию 1 кувшин = 7 стаканов, значит 2 кувшина и стакан =15 стаканов(7*2+1).<== (на оной чаше весов)
(на другой чаше) 3 тарелки, если 1 тарелка = 5 стаканам, то 3 тарелки=15 стаканам (5*3). значит 15 стаканов(два кувшина и стакан)=15 стаканов(три тарелки)
значит по первому взвешиванию 1 кувшин=7 стаканов.
300*200=600000
600000*8/8/1024~59Кб
Обозначение примерно (~)
Должно быть так, если не напутал
1) log2(256) = 8 бит = 1 байт на символ.
число строк равно число символов разделить на число символов в строке:
(3420 / 1) / 38 = 90 строк
2) 75 байт / 120 = 75 * 8 бит / 120 = 5 бит на символ
алфавит содержит не более
различных символов
===== PascalABC.NET =====
begin
var (s, n) := ReadInteger2('Введите S и N:');
var r := 0;
for var m10 := 0 to S div 10 do
begin
for var m5 := 0 to (S - 10 * m10) div 5 do
begin
if m10 + m5 > N then
break;
for var m2 := 0 to (S - 10 * m10 - 5 * m5) div 2 do
begin
if m10 + m5 + m2 > N then
break;
for var m1 := 0 to S - 10 * m10 - 5 * m5 - 2 * m2 do
begin
if m10 + m5 + m2 + m1 > N then
break;
if (m10 * 10 + m5 * 5 + m2 *2 + m1 = s) and
(m10 + m5 + m2+ m1 = N) then
begin
$'{m10} x 10 + {m5} x 5 + {m2} x 2 + {m1} x 1'.Println;
Inc(r)
end
end
end
end
end;
if r > 0 then
Println('Найдено вариантов размена:', r)
else
Println('Вариантов такого размена нет')
end.