Занумеруем монеты 1,2,3,4,5,6. Предполагается, что фальшивые монеты весят одинаково. 1) Кладем на левую чашу 1,2,3, а на правую - 4,5,6 Рассмотрим 2 возможных случая. Случай 1 2) Предположим, левая чаша перевесила. Значит, обе фальшивые монеты на правой. Кладем на левую 4, на правую 5. Если равновесие, то обе они фальшивые. Если какая-то легче, например, 5, то она фальшивая и фальшивая оставшаяся 6. Понадобилось всего 2 взвешивания. Случай 2 2) Теперь предположим, что весы в равновесии. Тогда каждая из троек содержит по одной фальшивой монете. Кладем на левую 1, на правую 2. Если равновесие, то обе они фальшивые. Если какая-то легче, например, 1, то она фальшивая и фальшивая оставшаяся 3. 3) Кладем на левую 4, на правую 5. Если равновесие, то обе они фальшивые. Если какая-то легче, например, 5, то она фальшивая и фальшивая оставшаяся 6.
Потому что библиотека находилась в одном месте, а пожар был в другом конце царского дворца. В любом случае, если бы пожар охватил место, так называемой библиотеки, то вряд ли причинил ей значительный ущерб, поскольку библиотека предстваляла из себя глиняные таблички. Всего во дворце было найдено около 30 тыс. небольших глиняных табличек разнообразной формы, они образовали целый пласт высотой в полметра. Таблички были исписаны очень мелкими клинообразными знаками. Такой клинописью пользовались в древности народы Междуречья. Каждый значок этого письма состоял из клинышков в разных сочетаниях и обозначал слог или слово. Для лучшей сохранности глиняные плитки были обожжены или высушены на солнце.
var a,b:integer;
begin
a:=12345;
writeln(a);
for b:=1 to 4 do begin
writeln (a div 10);
a:=a div 10;
end;
end.
program n2;
var a,b,c:integer;
begin
b:=54321;
c:=10000;
writeln(b);
for a:=1 to 4 do begin
writeln(b mod c);
c:=c div 10;
end;
end.
program n3;
var b,a:integer;
begin
a:=54321;
writeln(a);
for b:=1 to 4 do begin
writeln(a div 10);
a:=a div 10;
end;
end.