375,42 Гб есть _----------------------
В начале переправляем 1 и 2 разбойников
потом 2 переправляет в лодке 1 купца , купец вылазеет , а разбойник остается в лодке
далее переправляем 2 купца
ну а дальше переправляем 3 купца
и в конце 2 и 3 разбойники вылазят из лодки на берегу
<h3>PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var e:=0.0001;
var x:=ReadReal;
var a:=(x-1)/x;
var (s,n):=(a,2);
repeat
a*=(x-1)/x*(n-1)/n;
s+=a;
n+=1
until a<=e/n;
Writeln(log(x),' ',s)
end.
Язык C:
m=0; //кол-во отриц. элементов
proizv=1; //произвед отриц элементов
for(i=0; i<9; i++)
{
if (b[i]<0)
{ m++;
proizv=proizv*b[i];
}
}
Крипты, Услуги, Выполняй задания чтобы получать денег, как Appbonus, NVuti