Программа в Pascal ABC С клавиатуры вводится вещественное число, если оно из интервала {3,10} то на экран вывести его целую часть иначе десятичную
Программа в Pascal ABC
С клавиатуры вводится вещественное число, если оно из интервала {3,10} то на экран вывести его целую часть иначе десятичную
Ответ(ы) на вопрос:
Гость
var r: real;
begin
read(r);
if (r > 3) and (r < 10) then
write(trunc(r))
else
write(r - trunc(r))
end.
Не нашли ответ?
Похожие вопросы