На двух опытных участках общей площадью 100 кв.м. высадили тюльпаны. На каждом квадратном метре высаживали одинаковое число луковиц. На первом

Const
  n = 10;
 
var
  a,b,h,x: real;

begin
  writeln('a , b , h =');
  read(a, b, h);
  x := a - h;
  writeln('x':n, ' | ', 'y':n);
  repeat
    x := x + h;
    writeln(x:n:3, ' | ', (x * cos(1 / x) + 2):n:3);
   
  until x >= b;
end.