Chyba: Incompatibile Types – Delphi – Fórum – Programujte.com

Zdravím, napsal jsem program který řeší dané funkce v zadaných intervalech. Hlásí mi chybu pro if -2<=x<=8 then jako Incompatibile types. Víte, co je špatně?

program Project2;



{$APPTYPE CONSOLE}



uses

  SysUtils;



var

  x,y,b: real;

  i,a: integer;



begin

 a:=-10;

 b:=0.1;

  for i:=0 to 20 do

   begin

    x:=a+i*b;

     if x<-2 then

      begin

       y:=-2*x-2;

       writeln(x:0:2,y:0:2);

      end;

     if -2<=x<=8 then

      begin

       y:=x+4;

       writeln(x:0:2,y:0:2);

      end;

     if x>8 then

      begin

       y:=-2*x+28;

       writeln(x:0:2,y:0:2);

      end;

   end;

   readln;

end.

řádek 24 ;)

Takhle se to nedá psát, musíš napsat:

...

If (-2 <= x) and (x <= 8) then

...

takhle se to neda psat hlavne z duvodu ze se to vykonava po castech..
vyhodnoti se prvni srovnani a jeho vysledkem je Boolean a ten pak srovnavas s nejakym cislem.. proto ten "nekompatibilni" typ

na praci s booleanama jsou pak zase AND OR NOT a podobne.. (ikdyz ne jen s nimi)