Модератор: Модераторы
sgasgar1 писал(а): А русский язык в нем имеется?
case d of
Low(Integer)..-1 : { d < 0 };
0 : {d = 0};
1..High(Integer) : { d > 0 }
end;
Вернуться в Обучение Free Pascal
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 8