##
var (a, b, c, x, x_end, dx) := ReadReal6('Введите a, b, c, Xнач, Xкон, dX:');
Println(' X | F');
while x <= x_end + 1e-9 do
begin
var f := (x < 3) and (b <> 0) ? a*x*x - b*x + c :
(x > 3) and (b = 0) ? (x - a) / (x - c) : x / c;
if real.IsInfinity(f) or real.IsNaN(f) then Println($"{x,10:f2} | Деление на 0")
else Println($"{x,10:f2} | {(Trunc(a*b*c) mod 4 = 0 ? f.ToString('f4') : Trunc(f).ToString),12}");
x += dx;
end;