1 2 3 4 5 | n = 1 DO WHILE 30 * n ^ 2 - 1 > n ^ n n = n + 1 LOOP PRINT n - 1 |
Похожие записи/страницы:
- Написать программу поиска двузначных чисел таких, что если к сумме цифр этого числа прибавить квадрат этой…
- Дано целое число N(>1). Вывести наибольшее целое K, при котором выполняется неравенство 3K
- Определить целое число или нет- Basic(Бейсик)
- Вывести наибольшее целое K, при котором выполняется неравенство 3K - Basic(Бейсик)
- В числовую переменную К вводится целое число (-30000 <= К <= 30000). Определить сумму цифр - QBasic(Бейсик)
- Дано целое число. Определить оканчивается ли оно цифрой 7? - Basic(Бейсик)