Составить программу для вычисления и печати таблицы значений функции y=x*sin(5*x+1) на отрезке [0;1] с шагом 0,1.
Ответы
Ответ дал:
0
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Range(0.0,1.0,10).Tabulate(x->x*sin(5*x+1)).Println(NewLine)
end.
Результат
(0,0)
(0.1,0.0997494986604054)
(0.2,0.181859485365136)
(0.3,0.179541643231187)
(0.4,0.0564480032239469)
(0.5,-0.17539161384481)
(0.6,-0.454081497184757)
(0.7,-0.684271082365568)
(0.8,-0.767139419730511)
(0.9,-0.634986293013353)
(1,-0.279415498198927)
// Внимание! Если программа не работает, обновите версию!
begin
Range(0.0,1.0,10).Tabulate(x->x*sin(5*x+1)).Println(NewLine)
end.
Результат
(0,0)
(0.1,0.0997494986604054)
(0.2,0.181859485365136)
(0.3,0.179541643231187)
(0.4,0.0564480032239469)
(0.5,-0.17539161384481)
(0.6,-0.454081497184757)
(0.7,-0.684271082365568)
(0.8,-0.767139419730511)
(0.9,-0.634986293013353)
(1,-0.279415498198927)
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
9 лет назад
9 лет назад