var
l,x,sum:real;
i:integer;
begin
write ('L = ');
readln(l);
write ('X = ');
readln(x);
i:=1;
sum:=0;
while i<=101 do
begin
sum:=sum+exp((x+i)*ln(l))/i;
i:=i+2;
end;
writeln ('Summa: ',sum);
readln;
end.
Правильным ответом является 5)
См. пример в приложении
с желтого на синий, с желтого на красный, с синего на красный, с желтого на синий, с красного на желтый, с красного на синий, с желтого на синий.
тоесть: верхний корж перекладываем с желтого на синий поднос, средний корж перекладываем с желтого на красный, верхний с синего на красный, нижний с желтого на синий, верхний с красного на желтый, средний с красного на синий, верхний с желтого на синий.