Напишите на Паскале программу по вычислению функции с циклом y=√x^3+20x/7 с интервалом -8 до 8 с шагом 0,2

Предыдущий
вопрос Следующий
вопрос

program CalculateFunction;

uses crt, math;

var
x, y: real;

begin
clrscr;

writeln('x y');

x := -8;

while x <= 8 do
begin
y := sqrt(power(x, 3) + 20 * x / 7);
writeln(x:8:2, ' ', y:8:2);

end;

readln;
end.