Составить программа построения таблицы значений функции. y=(2*x+1)/sqrt(x-3) на интервале от 0 до 4 с шагом 0.1.
x>3 тогда может так?
Если от 0, то не выйдет: корень из -3 же О_О
var x: real; begin writeln('x y'); x:= 0; while(x <= 4) do<br>begin x := x + 0.1; if x>3 then writeln(x:3:1, ' ' , (2*x+1)/sqrt(x-3):4:2); end end.