Предмет:
ИнформатикаАвтор:
héctorsilvaАвтор:
paul4g3rАвтор:
melanyАвтор:
celloat3iАвтор:
cayetanoАвтор:
powersАлгоритм реализует вычисление по рекуррентной формуле
Коенечно, считать это вручную - занятие для рабов на галерах. Ошибиться при таких числах очень легко. Поэтому я поручил трассировку программе.
// PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018// Внимание! Если программа не работает, обновите версию!begin
var (x, y, i, n) := (6.0, 1.0, 1, 12);
while i <= n do
begin
y := 0.2 * (y + x / y);
Writeln(i:2, y:20:15);
Inc(i)
end
end.
1 1.400000000000000 2 1.137142857142860 3 1.282704953338120 4 1.192064001533930 5 1.245070159690060 6 1.212815140382150 7 1.231996586451940 8 1.220427990093710 9 1.22734721586140010 1.22318787891077011 1.22568065239323012 1.224183974349650Автор:
devonl74pДобавить свой ответ
Предмет:
Английский языкАвтор:
abelespinozaОтветов:
Смотреть
Предмет:
МатематикаАвтор:
bossyxkagОтветов:
Смотреть
Предмет:
ГеометрияАвтор:
hot pepperОтветов:
Смотреть