Цитата Сообщение от приборист Посмотреть сообщение
a:real;
a:=5.0/2.0; (a=2.5)
a:=5/2; (a=2)
if a real then с точкой
if a word then без точки

или real:=real/real then с точкой
word:=word/word then без точки