Вычисление функции Y=sinx на [1; 2] шаг 0,2 помогите

Question

Информатика

Дара

21 июня, 20:14

Вычисление функции Y=sinx на [1; 2] шаг 0,2 помогите

+2

Ответы (1)

Знаете ответ?

Феофил · Answer 1

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