Как в паскале определить, целое число или нет?
Как в паскале определить, целое число или нет?
Гость
Ответ(ы) на вопрос:
Гость Program n1;
var x,y:real;
begin
readln(x);
y:=round(x);
if y=x then writeln('число не дробное')
else writeln('число дробное');
end.
Не нашли ответ?
Похожие вопросы