Паскаль: «Введите с клавиатуры число x. Определите, является ли данное число дробным. Пример ввода: 3.5 Пример вывода: Число дробное»
Паскаль: «Введите с клавиатуры число x. Определите, является ли данное число дробным.
Пример ввода: 3.5
Пример вывода: Число дробное»
Гость
Ответ(ы) на вопрос:
ГостьProgram z1;
var a,c:real;
begin
readln(a);
c:=round(a);
if c=a then writeln('число не дробное')
else writeln('Число дробное');
end.
Не нашли ответ?
Похожие вопросы