Вычисление функции Y=sinx на [1;2] шаг 0,2 помогите
Вычисление функции Y=sinx на [1;2] шаг 0,2 помогите
Гость
Ответ(ы) на вопрос:
Гостьvar
x: real := 1;
begin
while (x <= 2) do
begin
writeln(x:4, ' | ', sin(x));
x := x + 0.2;
end;
end.
Вывод:
1 | 0.841470984807897
1.2 | 0.932039085967226
1.4 | 0.98544972998846
1.6 | 0.999573603041505
1.8 | 0.973847630878195
2 | 0.909297426825682
Не нашли ответ?
Похожие вопросы