Мальчики и девочки очень рады видеть « Пятьдесят оттенков серого» на серебряном экране, мы просто хотим кодировать, не беспокоясь, поэтому перед нами стоит задача поразмыслить.

Вы должны:

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

Это кодовый гольф, поэтому выигрывает самый короткий код.

MATLAB, 24 байта

Вторая попытка, теперь фактически соответствует правилам.

imshow(0:1/49:1,'I',2e3)

«I» означает «InitialMagnification», но, очевидно, Matlab будет автоматически заполнять имена в парах «имя / значение». Конечно, это хорошая игра в гольф!

Mathematica, 30 байт

Вот еще один подход Mathematica:

ArrayPlot[#+5#2&~Array~{5,10}]

или же

ArrayPlot[5#+#2&~Array~{10,5}]

Первый просто создает массив

{{6, 11, 16, 21, 26, 31, 36, 41, 46, 51}, 
 {7, 12, 17, 22, 27, 32, 37, 42, 47, 52}, 
 {8, 13, 18, 23, 28, 33, 38, 43, 48, 53}, 
 {9, 14, 19, 24, 29, 34, 39, 44, 49, 54}, 
 {10, 15, 20, 25, 30, 35, 40, 45, 50, 55}}

а второй

{{6, 7, 8, 9, 10},
 {11, 12, 13, 14, 15},
 {16, 17, 18, 19, 20},
 {21, 22, 23, 24, 25},
 {26, 27, 28, 29, 30},
 {31, 32, 33, 34, 35},
 {36, 37, 38, 39, 40},
 {41, 42, 43, 44, 45},
 {46, 47, 48, 49, 50},
 {51, 52, 53, 54, 55}}

Затем ArrayPlotстроит их в виде сетки и по умолчанию использует оттенки серого для визуализации значений.

CJam - 23 (без фактического графического вывода)

Поскольку CJam не может рисовать на экране (пока?), Я написал программу, которая выводит изображение в простом формате pgm .
Сохраните вывод в файл с именем 50.pgm и откройте с помощью средства просмотра / редактирования изображений.

"P2"1e3K51_,1>K*$K*~]N*

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

Результат выглядит так:

Объяснение:

"P2"     push "P2" (netpbm magic number)
1e3K     push 1000 and K=20 (image size)
51       push 51 (value of white)
_,       duplicate 51 and convert to an array [0 1 2 ... 50]
1>       remove 0 (slice from 1)
K*       repeat the array 20 times
$        sort, to get [(20 1's) (20 2's) ... (20 50's)]
K*       repeat the array 20 times
~        dump the elements on the stack
]        put everything from the stack in an array
N*       join with newlines

Mathematica 72 61 59 43 35 34 байта

Текущая версия (34 байта)

GrayLevel[#/50]~Style~50 &~Array~50    

Более ранняя версия (59 байт), благодаря Мартину Бюттнеру.

Graphics[{GrayLevel[#/50],Cuboid@{#~Mod~9,#/9}}&/@Range@50]

Синие границы добавлены, чтобы выделить положение квадратов.

Graphics[{EdgeForm[Blue], GrayLevel[#/50], Cuboid@{#~Mod~9, #/9}} & /@Range@50]

Количество квадратов:

    Length[%[[1]]]

50

Первая попытка (72 байта)

Если квадраты могут перекрываться. Как отмечает Згарб, существует небольшая вероятность того, что один квадрат будет скрывать другой.

  Graphics@Table[{GrayLevel@k,Cuboid[{0,15}~RandomReal~2]},{k,.4,.89,.01}]

Мудрец - 26 24 35 29 персонажей

matrix(5,10,range(50)).plot()

Это выглядит так:

Предыдущие попытки : сначала у меня было Matrix([range(50)]).plot(), потом matrix_plot([range(50)]). Это выглядело так:

Пользователь @flawr указал, что квадраты, созданные с настройками по умолчанию, слишком малы. Добавление figsizeопций исправляет это, но оно на 6 символов длиннее, чем версия 5x10 в верхней части этого ответа:

matrix_plot([range(50)],figsize=20)

R, 47 42 39 38 37 36 35 байт

Предполагая, что они могут перекрываться, это работает. Symbolsтребуется вектор, который содержит размер для каждого квадрата, и я экономлю пространство, повторно используя один и тот же вектор для всех параметров функции. Самый большой квадрат всегда шириной 1 дюйм. С диапазоном целых чисел 50:99 наименьший квадрат будет иметь ширину около половины дюйма, то есть 36 пикселей при 72 dpi.

symbols(x,,,x<-50:99,bg=gray(x/99))

Спасибо всем за комментарии и предложения, я довольно плохо знаком с R, так что все это очень познавательно.

Предыдущие версии:

symbols(x,sq=x<-50:99,bg=gray(x/99))            #36
x=50:99;symbols(x,sq=x,bg=gray(x/99))           #37
x<-50:99;symbols(x,sq=x,bg=gray(x/99))          #38
x<-1:50;symbols(x,sq=x/x,bg=gray(x/50))         #39
x<-1:50/50;symbols(x,sq=x/x,bg=rgb(x,x,x))      #42
x<-1:50/50;symbols(x,squares=x/x,bg=rgb(x,x,x)) #47

Предыдущее изображение:

Ява - 180

Довольно просто, просто рисуя коробки.

import java.awt.*;void f(){new Frame(){public void paint(Graphics g){for(int i=1;i<51;g.setColor(new Color(328965*i)),g.fillRect(i%8*20,i++/8*20,20,20))setSize(600,600);}}.show();}

С переносами строк:

import java.awt.*;
    void f(){
        new Frame(){
            public void paint(Graphics g){
                for(int i=1;
                    i<51;
                    g.setColor(new Color(328965*i)),
                    g.fillRect(i%8*20,i++/8*20,20,20))
                    setSize(600,600);
            }
        }.show();
    }

BBC BASIC, 57

FORn=51TO2STEP-1VDU19;-1,n,n,n:RECTANGLEFILL0,0,n*20NEXT

Квадраты должны быть не менее 20 пикселей, но нечего сказать, что они должны быть одинакового размера, поэтому я думаю, что это подходит.

Может быть возможно сократить это путем использования большего количества кодов VDU низкого уровня. Но переход от этого шаблона к менее интересному вряд ли сделает его короче.

ipython 2, 54 байта

Лучшее, что я мог сделать, - это программа ipython. При запуске ipython ipython -pylabи выполнении этой программы будет показан график с 50 оттенками серого в 50 квадратах:

t=arange(50);c=t/50.;scatter(t%5,t,500,zip(c,c,c),'s')

Выход:

Решение 2:

Вот еще одна программа (61 байт):

imshow(arange(50).reshape(5,10)*.02,'Greys',None,1,'nearest')

это отображает следующее окно:

JavaScript ( 72 , 70 , 67 байт)

72: оригинал (заимствуя умное ■использование из ответа Sphinxxx ):

for(i=90;i>40;)document.write('<font color=#'+i+i+i--+' size=7>&#9632;')

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

for(i=60;--i>9;)document.write('<font color='+i+i+i+' size=7>&#9632;')

67 байт (65 символов): замена объекта на символ юникода:

for(i=60;--i>9;)document.write('<font color='+i+i+i+' size=7>■')

C ++, 98 83 символа

Итак, вам понадобится эмулятор терминала, который поддерживает настоящие цвета. Например, для Mac OS существуют ночные сборки iTerm2. Я считаю, что для Unix это поддерживает консоль. Вот список, на всякий случай: https://gist.github.com/XVilka/8346728#now-supporting-truecolor

Компилировать с помощью g ++ (\ e зависит от компилятора).

Чтобы квадраты имели достаточную площадь, вам придется изменить размер шрифта вашего терминала.

#include <cstdio>
int main(){for(int i=51;i--;)printf("\e[48;2;%i;%i;%im ",i,i,i);}

Использование библиотек C вместо C ++ позволяет сбрить некоторые символы.

C 61 58 символов

Это та же самая программа, но на C, которая предполагает, что объявления нетипизированных функций возвращают int, и для которой не нужно включать некоторые стандартные библиотечные функции, как, например, в этом случае, printf. Предложено @cartographer. Три символа меньше благодаря @ user3601420

main(i){for(i=51;i--;)printf("\e[48;2;%i;%i;%im ",i,i,i);}

Компилируется с парой предупреждений (для предположения, что возвращаемый тип main равен int, и для неявного включения объявления printf).

Python 2, 125 115 104 байта

from turtle import*
shape("square")
bk(500)
ht()
pu()
exec'color((xcor()/2e3+.5,)*3);stamp();fd(21);'*50

Образец вывода:

Старая добрая черепаха. Это был единственный метод, который я мог придумать в Python, который печатал изображения на экране, используя только стандартные библиотеки.

Квадратная форма черепахи, случается, 21 на 21, что очень удобно. Это можно увидеть, покопавшись в turtle.py:

"square" : Shape("polygon", ((10,-10), (10,10), (-10,10), (-10,-10)))

Если у вас монитор высокого разрешения или вы не возражаете против того, чтобы несколько квадратов были за кадром, то это 93 байта:

from turtle import*
shape("square")
ht()
pu()
exec'color((xcor()/2e3,)*3);stamp();fd(21);'*50

демонстрация

(Эта демонстрация использует Skulpt , адаптируя фрагмент, найденный здесь . Он включен только для того, чтобы дать представление о том, что делает код - мне пришлось изменить несколько бит, чтобы заставить его работать.)

function out(a){var b=document.getElementById("output");b.innerHTML+=a}function builtinRead(a){if(void 0===Sk.builtinFiles||void 0===Sk.builtinFiles.files[a])throw"File not found: '"+a+"'";return Sk.builtinFiles.files[a]}
$(document).ready(function run(){Sk.canvas="canvas";Sk.configure({output:out,read:builtinRead});try{Sk.importMainWithBody("<stdin>",!1,'import turtle\nt=turtle.Turtle()\nt.speed(9)\nt.shape("square")\n\nt.bk(500)\nt.ht()\nt.pu()\nfor i in range(50):t.color(64+2*i,64+2*i,64+2*i);t.stamp();t.fd(21)')}catch(a){throw Error(a.toString());}})

<script type="text/javascript" src="http://ajax.googleapis.com/ajax/libs/jquery/1.6.2/jquery.min.js"></script><script src="http://www.skulpt.org/static/skulpt.min.js" type="text/javascript"></script><script src="http://www.skulpt.org/static/skulpt-stdlib.js" type="text/javascript"></script>
<canvas height="100" width="1200" id="canvas" style="border:1px solid gray">Your browser does not support HTML5 Canvas!</canvas>

J ( 43 41 40 38 33 29 символов)

После предложений от рандома .

1!:2&4'P2 ',":(,*:,],*:#?~)50

Это решение ничего не отображает, так как стандартная библиотека J не содержит процедур GUI. Вместо этого я генерирую изображение и записываю его в стандартный вывод. Выходной сигнал рандомизирован, это гарантирует, что все оттенки различны. Вот пример выходных данных и изображение, преобразованное в png и повернутое на 90 ° для удобства просмотра:

Excel vba, 81

В ближайшем окне:

for i=1 to 9:for j=1 to 9:k=i+j*10:cells(i,j).interior.color=rgb(k,k,k):next:next

на активном листе:

^{{81 оттенков - это столько же кода, сколько 50}}

R ,3732 символа ¹ :

image(t(1:50),c=gray.colors(50))

Тем не менее, дисплей для этого выглядит… ме (изображение повернуто на 90 °, чтобы лучше вписаться в текст; сжатый, исходная длина стороны квадрата> 20 пикселей):

Вот более приятная версия, которая отображает квадраты в случайном порядке внутри матрицы (50 символов):

image(matrix(sample(1:50),10),c=gray.colors(50))

(И да, три смежных квадрата, казалось бы, одинаковых цветов на самом деле три разных оттенка серого.)

¹ Да, еще один ответ R,и даже не самый короткий(сейчас самое короткое для R) - извинения. Мне не хватало красивого рендеринга в R.

Matlab 35 благодаря санчизам

imshow(int8(ones(20,1)*(0:.05:51)))

Matlab 36

imshow(uint8(ones(20,1)*(0:.05:51)))

Отображает 50 квадратов, заполненных значениями серого от 1 до 50, и 2 дополнительных прямоугольника, заполненных значениями серого 0 и 51:

Матлаб, 45

imshow(uint8(ones(20,1)*floor(1:0.05:50.95)))

JavaScript, 87 90 байт

for(i=90;i>40;)document.write('<p style=background:#'+i+i+i--+';height:9ex;width:9ex>')

Это выводит квадраты в HTML, потому что это действительно единственный метод графического вывода в JavaScript. Спасибо edc65 за сбривание 3 байта.

PHP 96 88 74 байта

Спасибо Исмаилу Мигелю за сохранение 22 байта!

for($i=60;--$i>9;)echo"<p style=background:#$i$i$i;height:9mm;width:9mm>";

Записывает 50 <p>секунд с высотой и шириной 9 мм (которые должны быть больше 20 пикселей на большинстве экранов), сложенных друг на друга, с незначительной разницей в оттенках.

Сгенерированный результат (изображение уменьшено и повернуто на 90 °):

Matlab - 33 байта

surf(meshgrid(1:7)),colormap gray

Несмотря на подробные команды, результат все еще довольно компактен. Это выглядит немного лучше , если вы замените surfс , surfaceно это стоит 3 символов.

Если вы не заметите 50-й серый квадрат, потому что он немного больше остальных!

Javascript (77 71 байт):

Этот ответ больше не основан на IE11. Это работает, потому что браузер преобразует плохие цветовые коды в пригодные для использования (добавляя #к числу).

Вот код:

for(i=59;i-->9;)document.write("<hr color="+i+i+i+" size=20 width=20>")

Firefox все еще обладает способностью делать круги.

(Малые изменения: Изменены for(i=61;i-->9;)в for(i=59;i-->9;)потому , что она производила 52 квадратов)

Старый ответ:

Это основано на моем ответе PHP и использует почти те же самые способы, чтобы сделать квадраты:

for(i=51;i--;)document.write("<hr color=rgb("+[i,i,i]+") size=20 width=20>");

Не самый короткий ответ, но стоит добавить сюда.

Это решение не совместимо с Chrome (выдает несколько зеленых цветов) и Firefox (тот же результат, но выдает круги? OO WTH?)

Поскольку это код-гольф, приемлемо решение, работающее с определенной версией или конкретным программным обеспечением.

Пит-2 * 103 = 206

Это уникально тем, что исходный код и выходные данные выполняют задачу:

Большая часть из них декоративная, поэтому я сосчитал только два верхних ряда, которые прекрасно стоят в одиночестве. Выводит ppm в градациях серого, как это сделали некоторые другие.

JavaScript - 70 байт

for(i=51;i-=1;)document.write('<a style=opacity:'+i/50+'>&#9632;</a>')

Обработка, 66 символов:

size(1000,20);for(int i=0;i<981;i+=20){fill(i/4);rect(i,0,20,20);}

PHP (62 60 63 72 71 62 59 байт):

Я сделал самое короткое, что я мог найти:

for($i=59;$i-->9;)echo"<hr color=$i$i$i size=20 width=20>";

Это точно такой же код, как и мой ответ на Javascript (с 71 байтом) .

Но НАМНОГО короче!

Это имеет причуду в Firefox: вместо квадратов Firefox делает круги ! (Go маразм!)
Othen , чем все браузеры производят правильный цвет (даже с недостающим #на colorатрибут).

Неверные представления и список изменений :

Старый ответ, с 62 байтами.

while($i++<51)echo"<hr color=rgb($i,$i,$i) size=20 width=20>";

Все оттенки идеально выровнены.

Это решение не будет работать для Chrome (будет создавать квадраты с несколькими цветами) и Firefox (что делает круги oO Да, круги с <hr>! Горизонтальная линейка - это круг в Firefox!).
Вы можете проверить это на IE11, и это должно быть хорошо.

(просто снято сверху)

Я заметил что-то ужасное: он выводил #111вместо #010101некоторых цветов.

Это означало, что некоторые цвета повторялись.

Поэтому пришлось пожертвовать несколькими байтами:

<?while(f>$c=dechex(65-$i++))echo"<hr color=#$c$c$c size=20 width=20>";

Выводит 50 оттенков в идеальном порядке, от светлого к темному.

Из-за правильной точки, сделанной @ edc65 , мне пришлось добавить width=20, чтобы получить идеальные квадраты .

Уменьшен еще один байт путем замены f!=$cна f>$c, который работает отлично.

Финальная версия, без width=20:

<?while(f!=$c=dechex(65-$i++))echo"<hr color=#$c$c$c size=20>";

Это неверно, потому что это необходимо для вывода квадратов.
Это выводит оттенки от светлого к темному.

Уменьшен 1 байт путем переключения на whileцикл, например так:

<?while($c=dechex(50-$i++))echo"<hr color=#$c$c$c size=20>";

Первое решение:

<?for($i=50;$c=dechex($i--);)echo"<hr color=#$c$c$c size=20>";

Здесь нет аккуратно упорядоченных оттенков, но есть 50 различных.

Ничто не говорит о том, что они должны быть заказаны, но есть требование к размеру.

Я надеюсь, что смогу уменьшить это намного больше.

Вы можете проверить это на http://writecodeonline.com/php/ (нажмите «Показать как HTML»).

CSS (87 символов)

Использует анимацию;)

:after{content:'\25A0';font:9em z;animation:g 8s steps(50)}@keyframes g{to{color:#fff}}

Выполняемая версия длиннее, поскольку Webkit все еще нуждается в префиксе поставщика. :(

:after{content:'\25A0';font:9em z;-webkit-animation:g 8s steps(50);animation:g 8s steps(50)}@-webkit-keyframes g{to{color:#fff}}@keyframes g{to{color:#fff}}

Если нам разрешен случайный пустой <a>элемент, мы можем уменьшить его до 72 символов:

a{padding:3em;animation:g 8s steps(50)}@keyframes g{to{background:#000}}

Видеть? CSS является законным языком программирования!

R, 36 байт

Я могу сделать ответ freekvd короче.

x=9:59/59;symbols(x,sq=x,bg=gray(x))

(Извините за то, что не сделал комментарий под его решением. Stackexchange пока не позволяет мне комментировать, голосовать и т.д.).

PostScript, 34 байта

В кодировке ISO-Latin-1:

20’›‡üˆì0{’81e3’6’–10’k0ˆ                   (note, this is a Line Feed)
’c’§}’H

Это двоичный эквивалент:

20 setlinewidth 1020 -20 0 { dup 1e3 div setgray 10 moveto 0 10 lineto stroke } for

(Предполагается, что вы используете его на устройстве шириной не менее 1000 точек [= 10 дюймов = 25,4 см].)

DrRacket - 83

Просто ради увольнения DrRacket через 1 год после «Введение в разработку систематических программ».

РЕДАКТИРОВАТЬ :

(require htdp/image)(map(λ(i)(rectangle 50 50'solid(make-color i i i)))(range 50))

C # - 173

Использование LINQPAD

var b=new Bitmap(1000,20);var g=Graphics.FromImage(b);for(int i=0;i<50;i++)g.FillRectangle(new SolidBrush(Color.FromArgb(i*5,i*5,i*5)),new Rectangle(i*20,0,20,20));b.Dump();

Расширен :

var b = new Bitmap(1000, 20);
var g = Graphics.FromImage(b);
for (int i = 0; i < 50; i++)
    g.FillRectangle(new SolidBrush(Color.FromArgb(i * 5, i * 5, i * 5)), new Rectangle(i * 20, 0, 20, 20));
b.Dump();

Выход :

JavaScript, 152 байта.

Ладно, может быть, это не лучшее решение, но вот мое.

function b(a){c=document
e=c.createElement('p')
with(e.style){background="rgb("+[a,a,a]+")"
width=height="20px"}c.body.appendChild(e)
a<245&&b(a+5)}b(0)

Вот вывод с помощью css float left (просто для того, чтобы легче было считать квадраты) и без: