Так что это мой первый вызов на этом сайте.
Задача состоит в том, чтобы взять входное целое число , которое будет положительным, и вывести в порядке возрастания (от до , включая n ) вывод (где - текущее целое число).
пример
Учитывая ввод 5, программа напечатает:
1
8
9
4
1
равно 1,
равно 8 и
равно 9, а
равно 4 и
равно 1 и
Вход и выход
Ввод будет в виде положительного целого числа. Выводом будет список чисел, разделенных запятыми или новыми строками.
Это код-гольф , поэтому выигрывает самый короткий код.
code-golf
math
arithmetic
Воплощение невежества
источник
источник
Ответы:
APL (Dyalog Unicode) ,
85 байтПопробуйте онлайн!
Анонимный префикс неявной функции. TIO тесты для диапазона [1..10].
Спасибо @lirtosiast за 3 байта.
Как:
источник
⍳*⊢-⍳
5 байт, используя⎕IO←1
.Haskell, 23 байта
Попробуйте онлайн!
Альтернативная версия, также 23 байта:
источник
Japt, 5 байт
Попытайся
источник
Perl 6 , 19 байт
Попробуйте онлайн!
Блок анонимного кода, который принимает число и возвращает список. Экспоненты почтового индекса диапазон
1 to input
и диапазонinput-1 to 0
источник
Aheui (эзотоп) ,
193164 байта (56 символов)Попробуйте онлайн!
Попробуйте это на AVIS ( корейский ); просто скопируйте и вставьте код выше, нажмите кнопку «Пуск», введите число, посмотрите, как он движется. Чтобы увидеть результат, нажмите значок > _ слева.
Это не много в гольфе, но я даю ему шанс.
источник
Pyth , 5 байт
Попробуйте онлайн!
Оптимально закодировано это было бы 4.106 байтов.
источник
J , 10 байт
Попробуйте онлайн!
Если нам действительно нужно разделить числа новой строкой:
J , 13 байт
Попробуйте онлайн!
источник
Желе , 5 байт
Попробуйте онлайн!
источник
PHP, 32 байта
Запустите как трубу с
-nR
или попробуйте онлайн .источник
Октава , 18 байт
Попробуйте онлайн!
Благодаря Луису Мендо , использование внутренней переменной экономит 3 байта.
источник
Желе , 4 байта
Попробуйте онлайн!
источник
Wolfram Language (Mathematica) ,
242018 байтПопробуйте онлайн!
-4 спасибо @lirtosiast.
источник
MathGolf , 6 байтов
Попробуйте онлайн!
источник
Python 2 , 40 байт
Попробуйте онлайн!
Python 2 , 41 байт
Попробуйте онлайн!
источник
Рубин , 27 байт
Попробуйте онлайн!
источник
Сетчатка , 35 байт
Попробуйте онлайн! Объяснение:
Преобразовать ввод в унарный.
Подходим каждую позицию. Это тогда устанавливает несколько переменных замены.
$`
становится левым от матча;$>`
изменяет это, чтобы быть левым и соответствовать;$.>`
изменяет это, чтобы взять длину, то есть текущий индекс.$'
Между тем это право на совпадение, так же$.'
как и длина, то есть текущий показатель.Создайте строку
$.(
плюс$.'
повторения$.>`*
плюс_
. Например, для индекса 2 в исходном вводе 5$.'
- 3, а$.>`
2 - итоговая строка$.(2*2*2*_
. Это удобно - выражение замены сетчатки, которое вычисляет 2³. Каждая строка выводится на отдельной строке.Для каждой строки, сгенерированной предыдущим этапом, добавьте
.+
к ней префикс строки , превратив ее в этап замены, и оцените этот этап, вычислив, таким образом, выражение.источник
QBasic,
3533 байтаСпасибо @Neil за 2 байта!
Немного расширенная версия на REPL.IT, потому что интерпретатор не совсем соответствует спецификации.
Выход
источник
b^(a-b)
дляb=1..a
)F # (.NET Core) , 42 байта
Попробуйте онлайн!
источник
JavaScript (Node.js) ,
3332 байтаПопробуйте онлайн!
-3 байта с кредитами @Shaggy и -1 байт при @ l4m2!
JavaScript (Node.js) , 36 байт
Попробуйте онлайн!
JavaScript (Node.js) , 37 байт
Попробуйте онлайн!
источник
C # (интерактивный компилятор Visual C #) , 46 байт
Попробуйте онлайн!
источник
MATL , 5 байтов
Попробуйте онлайн!
объяснение
Рассмотрим ввод
5
в качестве примера.источник
Java, 59 байт
источник
a
, что мы не разрешаем.n->{for(int i=0;i++<n;)System.out.println(Math.pow(i,n-i));}
60 байт (код и тестовые примеры в ссылке)Чисто , 37 байт
Попробуйте онлайн!
Определяет
$ :: Int -> [Int]
взятие целого числа и возвращение списка результатов.источник
R , 34 байта
Попробуйте онлайн!
источник
05AB1E , 5 байтов
Порт @lirtosiast 's Jelly ответа .
Попробуйте онлайн.
Объяснение:
источник
Луа ,
4341 байт-2 байта благодаря @Shaggy
Попробуйте онлайн!
источник
+0
; кажется, работает без него.R, 22 байта
Довольно очевидный; обратите внимание, что
:
оператор имеет более высокий приоритет, чем-
оператор, так чтоn:1-1
короче(n-1):0
Если нам разрешено начинать с 0, то мы можем потерять два байта,
(0:n)^(n:0)
избегая необходимости в -1.источник
Древесный уголь , 9 байт
Попробуйте онлайн! Ссылка на подробную версию кода. Объяснение:
источник
C # (интерактивный компилятор Visual C #) , 55 байт
Попробуйте онлайн!
источник
Perl 5
-n
, 21 байтПопробуйте онлайн!
источник