126 дисков
Объяснение:
Рассмотрим 6го покупателя
х-было
0,5х+1-продал
осталось 0
х-(0,5х+1)=0
х-0,5х-1=0
0,5х=1
х=1:0,5=2
Аналогично 5й покупатель
х-(0,5х+1)=2
х-0,5х-1=2
0,5х=3
х=3:0,5=6
Аналогично 4й покупатель
х-(0,5х+1)=6
х-0,5х-1=6
0,5х=7
х=7:0,5=14
Аналогично 3й покупатель
х-(0,5х+1)=14
х-0,5х-1=14
0,5х=15
х=15:0,5=30
Аналогично 2й покупатель
х-(0,5х+1)=30
х-0,5х-1=30
0,5х=31
х=31:0,5=62
Аналогично 1й покупатель
х-(0,5х+1)=62
х-0,5х-1=62
0,5х=63
х=63:0,5=126
ответ: Попов принес на ярмарку 126 дисков
// PascalABC.NET 3.6
uses NumLibABC;
begin
var oC := new Zeroin(x -> 0.02 * Exp(2 * x) - 4 * Sin(6 * x), 1e-6);
Write(oC.Value(1.8, 2.4):0:5)
end.
Объяснение:
Пакет NumLibABC входит в стандартную поставку PascalABC.NET. При необходимости, инструкции (с необходимой теорией вопроса) можно найти в документации, которая находится в системной папке установки программы \PascalABC.NET\Doc\, а исходный текст класса Zeroin можно взять из \PascalANC.NET\LibSource\NumLibABC.pas.