Написать программу в Pascal Найти: y=x^4+3/3x на промежутке [4;10] с шагом 0.1 Использовать цикл с постусловием

Const
  dx = 0.1;
  l = 4;
  r = 10;
var
  x,y:real;
begin
  x := l;
  repeat
    y := sqr(sqr(x)) + 1/x;
    writeln(x:4:1, : ,y:0:3);
    x := x + dx;
  until x > r;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.