Введите с клавиатуры число х. Определите, является ли данное число дробным. Пример ввода: 3,5 Пример вывода: число дробное.

ОТДЕЛ Задание+; ИСПОЛЬЗУЕТ Параметр ИЗ "...\Отделы\Обмен\", Вывод ИЗ "...\Отделы\Обмен\", Текст ИЗ "...\Отделы\Числа\"; ПЕР   строка: РЯД 32 ИЗ ЗНАК;   число: ВЕЩ;   сч: ЦЕЛ; УКАЗ   Параметр.Текст(1, строка);   сч := 0;   число := Текст.ВВещ(строка, сч);   ЕСЛИ ЦЕЛЧАСТЬ(число) # число ТО     Вывод.Цепь("Число дробное.")   ИНАЧЕ     Вывод.Цепь("Число целое.")   КОН КОН Задание.