Найти значение функции для х от 0 до 16 с шагом 1. Написать в виде программы

Question

Найти значение функции для х от 0 до 16 с шагом 1. Написать в виде программы

---

Comments

Мне кажется, в условии опечатка. Допустим, х=1. Тогда х>=-3,5 и х<1. Т.е. выполняется и первое, и второе условие. Такого быть не должно. Скорее всего, знака "минус" не должно быть.

Answer 1

Если в верхней строчке не "-3,5", а просто 3,5, то тогда вот такая программа:
var
   F:real;
   x:integer;
begin
writeln(' x','F':6);
for x:=0 to 16 do
  begin  if x>=3.5 then F:=4*x*x+2*x-19
    else F:=-2*x/(-4*x+1);
  writeln(x:2,F:8:2);
  end
end.