---

program zadacha2;

var
  x, fx, step: real;
  n, i: integer;

begin
  // Исходные данные
  step := 0.233333;
  n := 15; // Количество точек (как в таблице Excel)
  
  writeln('Таблица значений функции f(x) = x * sqrt(x + 2)');
  writeln('Отрезок: [-2; 1,5]');
  writeln('Шаг: ', step:0:6);
  writeln;
  writeln('  i':4, '    x':12, '    f(x)':15);
  writeln('----------------------------------------');
  
  x := -2; // Начало отрезка
  
  for i := 1 to n do
  begin
    // Проверяем, что подкоренное выражение неотрицательно
    if (x + 2) >= 0 then
    begin
      fx := x * sqrt(x + 2);
      writeln(i:4, x:12:6, fx:15:6);
    end
    else
    begin
      writeln(i:4, x:12:6, '    Ошибка: x < -2');
    end;
    
    x := x + step; // Переходим к следующей точке
  end;
  
  writeln('----------------------------------------');
end.