Здравствуйте, elisaveta2203!
Вот и программа. А алгоритм простой:
циклим по всем точкам, вычисляем значение функции в точке,
если положительное, то выводим.
Если под концом отрезка (е) понимается что-то другое - поменяйте.
[code lang=pascal h=200]
{Составить постановку, алгоритм и программу поиска положительных значений
функции g = h/2.4 + ln(14.6 + h) на отрезке [1.7, е] с шагом 1.4.}
var {переменные}
h:real; {текущий аргумент}
e:real; {правый край отрезка}
s:real; {шаг}
y:real; {временная переменная}

{функция вычисления значения функции в точке}
function g(var x:real):real;
begin
g:=x/2.4 + ln(14.6 + x); {возвращаем значение функции от аргумента}
end;

begin
e:=2.718; {задаем правый край отрезка}
s:=1.4; {заданный шаг}
h:=1.7; {начальное значение аргумента, левый край отрезка}

{цикл поиска положительных значений функции на отрезке}
while(h<=e) do {считаем, пока точка в пределах отрезка}
begin
y:=g(h); {вычисляем значение функции в точке}
if (y>0) then {проверяем на положительность}
begin {выводим на экран в виде g(h) = y}
{формат: h - всего 3 символа с однимм знаком после точки}
{ y - 6 символов с 4-мя знаками после точки}
Writeln('g(',h:3:1,') = ',y:6:4);
Writeln; {переход на новую строку}
end;
h:=h+s; {сдвигаем на шаг, переходим на новую точку}
end;
Readln; {ждем нажатия на Enter}
end.
[/code]