IF A(K) - INT (A(K)) > 0 THEN
rem A(K) - не целое
END IF
Похожие записи/страницы:
- Дано целое число. Определить оканчивается ли оно цифрой 7? - Basic(Бейсик)
- Дано целое число N(>1). Вывести наибольшее целое K, при котором выполняется неравенство 3K
- Ввести целое число и определить сколько цифр в числе меньше числа 5 - C#(Си шарп)
- В числовую переменную К вводится целое число (-30000 <= К <= 30000). Определить сумму цифр - QBasic(Бейсик)
- Найти наибольшее целое положительное число n, удовлетворяющие условию -n^n+30n^2-1>0 - Basic(Бейсик)
- Получить случайное число в заданном диапазоне- Visual Basic(Бейсик)