Pascal. Как написать фрагмент кода, который будет определять, целое число, или дробное?

Question

Информатика

Мана

1 января, 14:18

Pascal. Как написать фрагмент кода, который будет определять, целое число, или дробное?

+2

Ответы (1)

Знаете ответ?

Дрона · Answer 1

Var

p, k:real;

begin

writeln ('Введите число: ') ;

readln (p) ;

k:=frac (p) ;

if k=0 then write ('Целое число')

else write ('Дробное число') ;

readln;

end.