Протобулировать функцию y=x-pi (число пи-3.14) на отрезке [0; 19] с шагом h=0.1*19, вывисте среднее арифмитическое всех отрицательных значений функции.

Question

Аполлинария

17 марта, 21:53

+2

Ответы (1)

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

Варварий · Answer 1

var

x: real;

begin

writeln ('x|':6, 'y':5) ;

while (x < = 19) do

begin

writeln (x:5, '|', x - Pi:5) ;

x + = 0.1 * 19;

end;

end.