Составте программу табулирования функции y=1/x^2 с шагом 0,5 и интервал -5

237

482

Посмотреть ответы 2

Ответы на вопрос:

вошл

Информатика

4,4(15 оценок)

{составте программу табулирования функции y=1/x^2 с шагом 0,5 и интервал -5< x< 7}const max_x = 7; min_x = -5; d_x = 0.5; var x, y: real; begin x : = min_x; while(x < max_x) do begin if(x < > 0) then y : = 1 / (x * x) else y : = 0; writeln('x=', x: 2: 1, ' y=', y: 2: 5); x : = x + d_x; end; end.