Задано вещественное число F. Вычислите разность целой и дробной части числа F
Var
F: real;
begin
F:= 4.25;
write(trunc(F) - (F - trunc(F)));
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var
F: real;
begin
F:= 4.25;
write(trunc(F) - (F - trunc(F)));
end.