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

Question

Юша

29 марта, 08:12

+3

Ответы (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.