Цель

Учитывая введенное число, округлите его до ближайшего числа с одной значащей цифрой.

Требования

вход

• Число с плавающей запятой.
• Предположим, что введенное число приводит к выводу в пределах ограничений типа данных (т.е. игнорирует ошибки переполнения.)
• 0 неверный ввод.
• Числа, которые не могут быть точно представлены в типе данных с плавающей запятой (например "0.35", сохраняются как 0.3499999), не должны поддерживаться.

Выход

• Ближайшее число, состоящее из одной ненулевой цифры и любого количества нулевых цифр.
• Результат должен поддерживать отрицательные числа и дробные числа.
• Когда вход находится точно между двумя возможными выходами, округлите от нуля.

презентация

Основное внимание уделяется расчету, а не презентации. Вывод может быть типом данных с плавающей запятой. Это может быть текст в полном объеме или в научной записи. Если вы обнаружите лазейку, в которой представление определенным образом уменьшает количество байт, слава вам!

Примеры

9
-3000
.2
0.2
-.2
7e12
5e-15
1e0

Тестовые случаи

Input     Output
1         1
10        10
17        20
99        100
54321     50000
56789     60000
-123      -100
-789      -800
0.23      0.2
0.25      0.3
-0.25     -0.3
4.56e23   5e23
4.56e-23  5e-23

счет

Код с наименьшим количеством байтов после одной недели выигрывает.

MATL , 3 байта

1&V

Попробуйте онлайн! Или проверьте все тестовые случаи .

0.25Сбой теста для компилятора, работающего в Octave на TIO, но работает в Matlab на Windows:

Различное поведение вызвано sprintfфункцией Octave / Matlab, использующей либо «округление банкира», либо «.5 от нуля», в зависимости от платформы. Более подробную информацию и тесты можно найти здесь .

Для 6 байтов ,

1t3$Yo

работает как на Octave, так и на Matlab. Проверьте все контрольные примеры .

C # (.NET Core) , 19 байт

n=>n.ToString("G1")

Попробуйте онлайн!

Примеры:

Input     Output
----------------
 54321     5E+04
-56789    -6E+04
 99        1E+02
 0.23      0.2
 0.25      0.3
-0.25     -0.3
 4.56e23   5E+23
 4.56e-23  5E-23

Javascript, 19 байт

x=>x.toPrecision(1)

Сетчатка , 63 62 байта

1`[1-9]
$*#
#\.?[5-9]
#$&
T`d`0`#[\d.]+
0(\.?)#{10}
1$1
#+
$.0

Попробуйте онлайн!

PHP , 45 байт

<?=round($x=$argv[1],-floor(log10(abs($x))));

Попробуйте онлайн!

Тот же метод, что и в моем Python 2 ответа.

Также, кажется, правильно обрабатывает 0.35, что ставит его привязку выше ответа JS: D

T-SQL, 27 байт

SELECT FORMAT(i,'G1')FROM t

Используя тот же код форматирования .Net, что и в ответе C # Карлоса Алехо . Входные данные из плавающего столбца i в существующей таблице t , в соответствии с нашими стандартами ввода-вывода

Тестовые случаи:

Input         Output
------------ --------
1             1
10            1E+01
17            2E+01
99            1E+02
54321         5E+04
56789         6E+04
-123         -1E+02
-789         -8E+02
0.23          0.2
0.25          0.3
-0.25        -0.3
4.56E+23      5E+23
4.56E-23      5E-23

(Довольно удобно, что я могу предварительно загрузить таблицу ввода со всеми этими значениями и запустить их сразу.)

Python 2 , 62 байта

lambda x:round(x,-int(floor(log10(abs(x)))))
from math import*

Попробуйте онлайн!

Не используется для игры в гольф на питоне, но это работает.

Сбой 0.35из-за неточностей с плавающей запятой.

Спасибо Anders Kaseorg за указание, что это работает правильно в Python 2

Guile , 23 байта

(format #t"~,0e"(read))

Попробуйте онлайн!

Excel, 14 байт

=ROUNDUP(A1,1)

Perl 5 , 15 байт

printf"%.1g",<>

Попробуйте онлайн!

Zsh , 14 байтов

Порт perl ответа. Попробуйте онлайн!

printf %.1g $1

Forth (gforth) , 24 байта

: f 1 set-precision f. ;

Попробуйте онлайн!

Ожидается ввод в стек с плавающей запятой. Выход на стандартный вывод

Мне не нравится вносить изменения в глобальную (для этого примера) точность выходных функций с плавающей запятой, но это экономит много байтов, чтобы не возвращать предыдущее значение в конце. Не выводит в инженерной или научной нотации, независимо от ввода.

Примечание. По какой-то причине интерпретатор tio преобразуется 0.25в 0.2, а моя локальная установка преобразуется 0.25в 0.3. Я не совсем уверен, почему это так, но так как я получаю правильный результат локально, я оставляю свой ответ как есть

: f                   \ start a new word definition
  1 set-precision     \ set the floating point output words to use 1 significant digit
  f.                  \ output the top of the floating point stack
;                     \ end the word definition