Оператор не относится к этому типу операнда

[ZvEr_HaCkEr]

Может глупый вопрос, но почему?

if (a<0) and ( n mod 2 = 0) then begin

end;

a,n:extended

[Аватар]

n mod 2 - mod команда для целочисленных типов данных

[ZvEr_HaCkEr]

Да уже сам понял где накосячил, спасибо. Но не будет ли это быдлокодством?

var
g,h:string;
p,l:integer;

g:=FloatToStr(a);
h:=FloatToStr(n);
p:=StrToInt(g);
l:=StrToInt(h);

[Аватар]

Смотри Round, Trunc