46

कार्य: स्विस ध्वज का आउटपुट।

हैप्पी स्विस नेशनल डे / श्वेइज़र बुंडेसिएफ़िएरटाग / फ़ेते राष्ट्र राष्ट्र सुइस / फेस्टा नाज़ियोनेल स्वज़ीरा / फ़ाइस्ता नाज़ीनाला सियाजरा!

विवरण: ध्वज में #FFFFFFएक लाल ( #FF0000) पृष्ठभूमि पर एक सफेद ( ) क्रॉस होता है । क्रॉस में एक 6x6 वर्ग होता है, जिसमें प्रत्येक तरफ 6x7 आकार के हथियार होते हैं। क्रॉस 32x32 वर्ग पृष्ठभूमि के केंद्र में है, जिसमें प्रत्येक तरफ 6 इकाइयों की दूरी है। ( स्रोत )

आउटपुट का आकार प्रतिभागी द्वारा चुना जा सकता है, लेकिन छवि को इन अनुपातों से बिल्कुल मेल खाना चाहिए, इसका मतलब है कि इसका आकार 32 का गुणक होना चाहिए।

एक न्यूनतम संस्करण ऐसा लगेगा:

code-golf kolmogorov-complexity graphical-output

— flawr
स्रोत

1

ध्वज चुनौतियों के कुछ संस्करणों में, रंगीन ASCII आउटपुट की अनुमति दी गई थी, लेकिन आपने एएससीआई -कला को शामिल नहीं किया है । बस पुष्टि करने के लिए, ASCII आउटपुट की अनुमति नहीं है?

— स्टीफन

1

सही, केवल व्यापक रूप से ज्ञात छवि प्रारूप की अनुमति है और साथ ही स्क्रीन पर आउटपुट भी।

— दोष

20

echo 🇨🇭- मुझे लगता है कि यह अनुमति नहीं है

— डिजिटल ट्रामा

मुझे एक नीला सीएच दिखाई देता है, मैं नहीं देखता कि इसे क्यों अनुमति दी जानी चाहिए।

— दोष

1

@ टटलमैन मुझे लगता है

— लुइस

40

एसवीजी (एचटीएमएल 5), 94 83 82 64 बाइट्स

<svg><path d=M0,0V32H32V0M6,13h7V6h6v7h7v6H19v6H13V19H6 fill=red

स्निपेट का विस्तार करें

2 बाइट्स @ThePirateBay की बदौलत सहेजे गए। @ बटाको को 1 बाइट धन्यवाद दिया। सहेजे गए 18 बाइट्स @CraigAyre के लिए धन्यवाद इंगित करता है कि एक 32 × 32 छवि स्वीकार्य थी। जैसा कि @Saggy द्वारा बताया गया है, यह मानता है कि आपकी डिफ़ॉल्ट पृष्ठभूमि सफेद है; किसी भी पृष्ठभूमि पर काम करने वाले झंडे के लिए 22 बाइट्स जोड़ें:

<svg><path d=M0,0V32H32V0 fill=red /><path d=M6,13h7V6h6v7h7v6H19v6H13V19H6 fill=#FFF

स्निपेट का विस्तार करें

— नील
स्रोत

रास्ता बंद करने की जरूरत नहीं। आप रास्ता खुला छोड़ कर 4 बाइट्स बचा सकते हैं।

जैसा कि ThePirateBay ने कहा, >आपके पथ टैग में अधिकार वैकल्पिक है।

— एटीको

6

एसवीजी की अपनी "गोल्फ भाषा" है? Oo

— ETHproductions

16

XML सिंटैक्स लिखने के लिए उपयोग किए जाने के कारण, यह कोड मेरी आंखों को खराब कर देता है

— Nayuki

3

क्या आप viewBoxन्यूनतम संस्करण के लिए निकाल सकते हैं ? <svg><path d=M0,0V32H32V0M6,13h7V6h6v7h7v6H19v6H13V19H6 fill=red

— क्रेग आयरे

31

डॉस, 43 बाइट्स के लिए x86-16 मशीन कोड

               ; Draw 32x32 red square
B8 0C 28          mov  ax, 0x0C28   ; AL == color red, AH == set pixel function
B9 00 1F          mov  cx, 31
               DrawBox:
BA 00 1F          mov  dx, 31
               DrawRow:
CD 10             int  0x10
4A                dec  dx
75 FB             jnz  DrawRow
E2 F6             loop DrawBox

               ; Draw the interior white cross
B0 0F             mov  al, 0x0F    ; high byte already set
B1 06             mov  cl, 6       ; high byte already 0
               DrawCross:
B2 0D             mov  dl, 13      ; high byte already 0
               DrawCrossInner:
CD 10             int  0x10        ; plot CX, DX
87 D1             xchg dx, cx
CD 10             int  0x10        ; plot DX, CX
87 D1             xchg dx, cx
42                inc  dx
80 FA 12          cmp  dl, 13+6
75 F2             jne  DrawCrossInner
41                inc  cx
80 F9 19          cmp  cl, 6+(32-6-6)
75 EA             jne  DrawCross

C3                ret

उपरोक्त कोड को COM फ़ाइल के रूप में इकट्ठा करने और फिर DOS के तहत चलाने के लिए डिज़ाइन किया गया है। यह ROM BIOS वीडियो सेवाओं को ध्वज के अलग-अलग पिक्सेल को प्लॉट करने के लिए आमंत्रित करता है, जिससे स्क्रीन के ऊपरी-बाएँ कोने में स्विस ध्वज का 32 × 32 प्रतिनिधित्व होता है।

कोड मानता है कि वीडियो मोड पहले से ही 0x13 मोड पर सेट है, जिसका अर्थ यह भी है कि इसके लिए वीजीए डिस्प्ले की आवश्यकता होती है। अन्य वीडियो मोड का उपयोग किया जा सकता है, लेकिन वीजीए की आवश्यकता आपको दो चीजें देती है: (1) वर्ग पिक्सेल, और (2) एक डिफ़ॉल्ट पैलेट जिसमें एक सच्चा 100% लाल ( 0xFF0000) शामिल है (जिसका अर्थ है कि आपको पैलेट को बदलने के लिए बाइट बर्बाद नहीं करना है। रंग की)। इसलिए इस प्रोग्राम को चलाने से पहले, आपको अपने डिस्प्ले को मोड 0x13 पर स्विच करना होगा; निम्नलिखित कोड आपको बस इतना करना है:

mov  ax, 0x13
int  0x10

कोड कोई अन्य धारणा नहीं बनाता है, और डॉस-संगत ऑपरेटिंग सिस्टम के तहत किसी भी x86- संगत हार्डवेयर पर चलना चाहिए।

हालाँकि, झंडे को खींचने के तुरंत बाद कार्यक्रम समाप्त हो जाता है, इसलिए DOS प्रॉम्प्ट को सामान्य रूप से स्क्रीन के ऊपरी-बाएँ कोने पर फिर से प्रिंट किया जाएगा, जो ध्वज की शीर्ष कुछ पंक्तियों को कवर करेगा। इसलिए, यदि आप सही आउटपुट पर अचंभा करना चाहते हैं, तो आपको RETकलश से पहले सिस्टम को हैंग / पॉज करना होगा । यहाँ एक स्क्रीनशॉट है जो दिखता है, FreeDOS वर्चुअल मशीन में चल रहा है:

यह संभव हो सकता है कि आगे पिक्सेल डेटा को सीधे वीडियो बफ़र पर लिखकर इसे आगे बढ़ाएं, खासकर जब से मैं पहले से ही 0x13 मोड मान रहा हूं। मैंने अभी तक कोशिश नहीं की है। INT 0x10पहले से ही एक बहुत छोटा निर्देश है, लेकिन अगर मैं पिक्सेल डेटा को सीधे मेमोरी में लिखने के लिए एक-बाइट स्ट्रिंग निर्देशों का उपयोग कर सकता हूं, तो इसके परिणामस्वरूप एक महत्वपूर्ण कोड बचत हो सकती है।

— कोडी ग्रे
स्रोत

प्रभावशाली! मैं बहुत कुछ नहीं देखता, लेकिन जब मैं करता हूं तो यह हमेशा बहुत दिलचस्प होता है

— एड्रियन झांग

ASM के प्रशंसकों को देखकर अच्छा लगा।

— बिलाल बेगेरदज

आप इसे तीन 32 पिक्सेल चौड़ी टाईल्स के साथ कर सकते हैं, जो सभी पंक्तियों पर निर्भर हैं। यह अधिक डेटा का उपयोग करता है, लेकिन संचालन की संख्या में बचाता है। वैकल्पिक रूप से, आप बाईं ओर के लिए तीन 16 पिक्सेल चौड़ी टाइलों का उपयोग कर सकते हैं और बाईं ओर उलट कर एक सममित ऑपरेशन कर सकते हैं।

— ATL_DEV

21

MATL , 29 बाइट्स

2Y66t&Y"OJQht3$)6thYaQK7hBoYG

MATL ऑनलाइन पर यह कोशिश करो !

व्याख्या

2Y6     % Push predefined literal: 3×3 matrix [0 1 0; 1 1 1; 0 1 0]
6t&Y"   % Repeat each entry 6 times in the two dimensions. Gives an 18×18 matrix
OJQh    % Push [0 1j+1]. Used as an index, this means [0 1 ... end+1]. Indexing
        % is 1-based and modular, so 0 is the same as end
t3$)    % Apply that index in the two dimensions. This extends by 1 entry in 
        % each dimension, so that the arms have length 7. Gives a 20×20 matrix
6thYa   % Pad with 6 zeros in the two dimensions. Gives a 32×32 matrix
Q       % Add 1. The matrix now contains values 1 (will become red) and 2 (white)
K7hBo   % Convert array [4 7] to binary. Gives [1 0 0; 1 1 1], to be used as
        % colormap. First row is red, second is white
YG      % Show image using colormap

— लुइस मेंडो
स्रोत

17

जावा 8, 246 + 42 = 288 बाइट्स

@ -आर्टन -64 बाइट्स के लिए धन्यवाद। एक्सटेंशन के बिना
फाइल करने के लिए आउटपुट द्वारा -4 बाइट्स a।

import java.awt.*;import java.awt.image.*;
x->{BufferedImage i=new BufferedImage(32,32,1);Graphics g=i.getGraphics();g.setColor(Color.RED);g.fillRect(0,0,32,32);g.setColor(Color.WHITE);g.fillRect(13,6,6,20);g.fillRect(6,13,20,6);javax.imageio.ImageIO.write(i,"png",new java.io.File("a"));}

एक लांबा अभिव्यक्ति जिसे एक कार्यात्मक इंटरफ़ेस विधि को सौंपा जा सकता है जो एक अपवाद को फेंकता है। एक छवि फ़ाइल नामित बनाता है aइस फाइल चल निर्देशिका में (एक छवि फ़ाइल)।

आसपास का कोड इसे चलाने के लिए उपयोग किया जाता है: इसे ऑनलाइन आज़माएं!

Ungolfed

x->{
    BufferedImage i=new BufferedImage(32,32,1);
    Graphics g=i.getGraphics();
    g.setColor(Color.RED);
    g.fillRect(0,0,32,32);
    g.setColor(Color.WHITE);
    g.fillRect(13,6,6,20);
    g.fillRect(6,13,20,6);
    javax.imageio.ImageIO.write(i,"png",new java.io.File("a"));
}

नतीजा

IntelliJ IDEA छवि पूर्वावलोकन (जाहिरा तौर पर) द्वारा प्रदान की गई ग्रिड।

— जस्टिन मेरिनर
स्रोत

आप अपने fillPolygonकॉल को दो fillRectकॉल में बदलकर काफी बाइट्स शेव कर सकते हैं। मुझे यकीन नहीं है कि मैं आयामों का सम्मान करता हूं, लेकिन मैं ऊपर आया हूं g.fillRect(7,13,18,6);g.fillRect(13,7,6,18)जो 64 बाइट्स से छोटा है

— हारून

@Aaron अच्छा कॉल, किसी कारण से मुझे लगा कि अब और होगा ... धन्यवाद!

— जस्टिन मेरिनर

आप बाइट के .pngबजाय फ़ाइल को नाम दे सकते हैं a.pngऔर सहेज सकते हैं।

— user2428118

@ user2428118 अच्छा, क्या इसे और आगे ले जाने की अनुमति दी जाएगी a, बिना विस्तार के? यह अभी भी खोला जा सकता है, बस एक फोटो दर्शक में खोलने के लिए कहा जाना चाहिए।

— जस्टिन मेरिनर

1

@ OlivierGrégoire मुझे लगता है कि यह मेरे समाधान के विचार से बहुत दूर है, लेकिन आप का स्वागत है कि आप अपने खुद के रूप में

— जस्टिन Mariner

16

एक्सेल VBA, _{86 85} 79 बाइट्स

कोड

बेनामी VBE तत्काल खिड़की समारोह है कि कोई इनपुट लेता है और सीमा पर स्विस ध्वज आउटपुट [A1:F32]की ActiveSheetवस्तु। यह पहले कोशिकाओं को चौकोर बनाकर काम करता है, फिर लाल क्षेत्र को खींचता है और अंत में सफेद क्रॉस में चित्रित करता है।

Cells.RowHeight=48:[A1:AF32].Interior.Color=255:[G14:Z19,N7:S26].Interior.Color=-1

^{^{ध्यान दें कि लाल पृष्ठभूमि में लगाने के बाद स्विस ध्वज के "क्रॉस" को रंगने के कदम को हटाने वाली व्यवस्था वास्तव में उपरोक्त विन्यास से अधिक लंबी है, क्योंकि उन्हें कम से कम 16 सेल पतों की आवश्यकता होती है, जो 8 अलग-अलग क्षेत्रों में समन्वय करते हैं। झंडा}}

-1 बाइट धन्यवाद करने के लिए @ Greedo के लिए RowHeight=48खत्म हो गयाColumnWidth=2

-6 बाइट्स @ Greedo के -1बजाय इसके लिए धन्यवादrgbWhite

उत्पादन

— टेलर स्कॉट
स्रोत

1

बहुत खुबस; लेकिन आप Interior.Color=-1इसके बजाय 6 बाइट्स बचा सकते हैंInterior.Color=rgbWhite

— Greedo

@ श्री, हुह, आप क्या जानते हैं - यह शानदार है। मैंने स्पष्टता rgbWhiteके 16777215लिए इसके दशमलव मूल्य का उपयोग किया था , मुझे नहीं पता था कि -1इसका प्रभाव समान होगा। धन्यवाद!

— टेलर स्कॉट

1

इस लिंक के अनुसार: ( reddit.com/r/compsci/comments/62x9g9/… ) PowerPoint पूरा हो रहा है इसलिए मुझे आश्चर्य है कि इसे PowerPoint में कैसे

— चित्रित

13

सी ++, एसएफएमएल, 406 399 394 बाइट्स

-2 बाइट्स pdpi
-10 बाइट्स के लिए धन्यवाद Zacharý के लिए धन्यवाद

एसएफएमएल (सिंपल एंड फास्ट मल्टीमीडिया लाइब्रेरी) एक सी ++ लाइब्रेरी है जिसे वीडियो गेम और मल्टीमीडिया कार्यक्रमों के विकास में आसानी के लिए लिखा गया है

कोड :

#include<SFML\Graphics.hpp>
using namespace sf;int main(){for(RenderWindow t(VideoMode(128,128),"");t.isOpen();){t.clear();RectangleShape r({128.f,128.f});r.setFillColor(Color::Red);t.draw(r);r.setFillColor(Color::White);r.setPosition({24.f,52.f});r.setSize({80.f,24.f});t.draw(r);r.rotate(90);r.setPosition({76.f,24.f});t.draw(r);t.display();for(Event e;t.pollEvent(e);)if(!e.type)t.close();}}

झंडा 128x128 विंडो में प्रदर्शित होता है। आपके OS को 128x128 विंडो प्रदर्शित करने में सक्षम होना होगा (मेरा Win8.1 छोटी चौड़ाई के साथ प्रदर्शित नहीं हो सकता है)

चेतावनी : आप कोड की इन 2 पंक्तियों को जोड़ना चाह सकते हैं: t.setFramerateLimit(60);t.setVerticalSyncEnabled(true);इसलिए जब आप कोड चलाते हैं तो आपका सीपीयू गर्म नहीं होगा। मैंने उन्हें गोल्फ कारणों के लिए मूल कोड में नहीं रखा था।

— HatsuPointerKun
स्रोत

आप अपने व्हाट्सएप को फोर्सेस से बदल कर इसे थोड़ा सिकोड़ सकते हैं और टी और ई को इनिशियलाइज़ कर सकते हैं:

int main(){for(sf::RenderWindow t(sf::VideoMode(128,128),"");t.isOpen();){t.clear();sf::RectangleShape r({128.f,128.f});r.setFillColor(sf::Color::Red);t.draw(r);r.setFillColor(sf::Color::White);r.setPosition({24.f,52.f});r.setSize({80.f,24.f});t.draw(r);r.rotate(90);r.setPosition({76.f,24.f });t.draw(r);t.display();for(sf::Event e;t.pollEvent(e);)if(e.type == 0)t.close();}}

— pdpi

इसके अलावा, आप रिक्त स्थान हटाकर दो बाइट्स बचा सकते हैं: e.type == 0=> e.type==0, शायद यहां तक कि !e.type(पूर्वता को याद न रखें)। 24.f }=>24.f}

— Zacharý

ओह, और using namespace sf;संभव है?

— Zacharý

12

ब्रिंद्रा, 227 बाइट्स (गैर-प्रतिस्पर्धात्मक) (वास्तव में काम करने के लिए अद्यतन)

Ungolfed संस्करण (241 बाइट्स)

r<<^++++++++[-^++++v]^[->>[>]>++++++++[-<++++>]<[<]<]>>[[-vv[v]-[^]^]>]vv<[<]>>>>>>>>>>>>>>vvvvvvg<<^^++++++[->>[>]>+++++[-<++++>]<[<]<]>>[[-vv[v]b-g-[^]^]>]<vv[<]><<<<<<<vvvvvvv<<^^++++++[-vv[v]++++++++++++++[^]^]vv[[->>[>]b[+]-g[+]-[<]<]v]

हल्के से गोल्फ संस्करण (227 बाइट्स)

r<<^++++++++[-^++++v]^[->>[>]>++++++++[-<++++>]<[<]<]>>[[-vv[v]-[^]^]>]vv<[<]g>>>>>>>>>>>>vvvv++++++[->>[>]>+++++[-<++++>]<[<]<]>>[[-vv[v]b-g-[^]^]>]<vv[<]<<<<<<vvvvv<<++++++[-vv[v]++++++++++++++[^]^]vv[[->>[>]b[+]-g[+]-[<]<]v]

बृंदराव मेरे अपने डिजाइन की एक प्रोग्रामिंग भाषा है। आज दोपहर 3:08 बजे तक, मेरे पास एक काम करने वाला दुभाषिया है और जाँच कर चुका हूँ कि कार्यक्रम ठीक से चल रहा है या नहीं। हालांकि, इस प्रतियोगिता के शुरू होने से पहले दुभाषिया मौजूद नहीं था, इसलिए मैं प्रतिस्पर्धा नहीं कर रहा हूं।

ब्रिन्द्रव ब्रेनफ *** के समान है, सिवाय इसके कि यह एक आयामी आयाम के बजाय तीन दो आयामी सरणियों पर संचालित होता है। इन सरणियों को आर, जी, और बी कहा जाता है, और लाल हरे और नीले रंग चैनलों के रूप में कार्य करते हैं। ऑपरेटर r सूचक को लाल चैनल पर ले जाता है, आदि आदि ऊपर है ^, नीचे v है।

— बेंजीन
स्रोत

9

इस के लिए एक अनुवादक की प्रतीक्षा है, आज़माने के लिए आसान हो सकता है

— डैरेन एच

1

यह निश्चित रूप से एक मजेदार विचार है, मैं एक दुभाषिया के लिए भी तत्पर हूं! (तकनीकी रूप से हम केवल उन्हीं भाषाओं को अनुमति देते हैं, जिन्हें लागू किया गया है, और हम दुभाषिया को उनकी परिभाषा

— मानते हैं

क्या यह सही है कि आप स्पष्ट रूप से कुछ भी उत्पादन नहीं करते हैं, लेकिन अंत में पूरे "कैनवास" का उत्पादन करते हैं? क्या आप मानते हैं कि कैनवास अनंत है?

— दोष

फिर से: कोई दुभाषिया नहीं, मुझे लगता है कि मेरा प्रवेश गैर-प्रतिस्पर्धात्मक है। ओह अच्छा। लेकिन हां, इस प्रोग्राम का प्रति आउटपुट नहीं है, प्रोग्राम चलने के बाद और बाद में कंप्यूटिंग स्पेस प्रदर्शित होता है। कैनवास सैद्धांतिक रूप से अनंत है, लेकिन कार्यान्वयन में, मैं शायद इसे कुछ बड़े-ईश तय चौड़ाई जैसे कि शायद 512x512

— बेंजीन

यह भाषा kolmogorov जटिलता छवि चुनौतियों में सक्षम लगती है। और क्या आप वर्तमान में एक दुभाषिया पर काम कर रहे हैं?

— 14

10

TI-BASIC (TI-84 Plus C (S) E only), 58 बाइट्स

:For(A,0,31
:For(B,0,31
:Pxl-On(A,B,RED
:End
:End
:For(A,6,25
:For(B,13,18
:Pxl-Off(A,B
:Pxl-Off(B,A
:End
:End

— स्कॉट मिलनर
स्रोत

यह एक कमाल का जवाब है। मैंने इसे उभारने के लिए सिर्फ एक खाता बनाया है। TI-BASIC बहुत बढ़िया है

— Zags

1

ओह, एक डीलक्स थर्ड पैरामीटर Pxl-on के पास अब क्या है ... यह मुझे रोता है केवल मोनोक्रोम होने का मतलब है :(

— रे

10

मैथेमेटिका, 83 बाइट्स

R=Rectangle;Graphics[{Red,{0,0}~R~{32,32},White,{6,13}~R~{26,19},{13,6}~R~{19,26}}]

अगला एक @ ASCII- केवल से है (मुझे लगा कि यह एक मजाक था लेकिन यह काम करता है!)

गणितज्ञ, २३ बाइट्स

"CH"~CountryData~"Flag"

-Jonathan Frech से -10 बाइट्स

— J42161217
स्रोत

4

Mathematica में स्विस ध्वज के लिए अंतर्निहित नहीं है?

— सीजे डेनिस

4

CountryData["Switzerland","Flag"]लेकिन इसका सही अनुपात नहीं हो सकता है

— ASCII-only

6

Mathematica में सब कुछ के लिए एक अंतर्निहित है, लेकिन यह?

— सर्गिओल

10

"Switzerland"~CountryData~"Flag"आपको कुछ और बचाता है

— एक सिमंस

1

"CH"~CountryData~"Flag"केवल 23 बाइट्स लेता है।

— जोनाथन फ्रीच

9

HTML + CSS, 15 + 117 बाइट्स = 132 बाइट्स

एक फ्लेक्सबॉक्स आवरण का उपयोग करके a inset box-shadow।

b{display:flex;box-shadow:red 0 0 0 6px inset;padding:2px;width:28px;flex-wrap:wrap}a{border:solid red 4px;margin:3px

<b><a><a><a><a>

स्निपेट का विस्तार करें

HTML + CSS, 18 + 139 137 122 बाइट्स = 140 बाइट्स

पिछले जवाब का उपयोग कर borderऔर नकारात्मक के साथ एक मध्यवर्ती flexbox आवरण margin।

i,b,a{display:inline-flex}i{border:solid red 6px}b{margin:-4px;width:28px;flex-wrap:wrap}a{border:solid red 4px;margin:3px

<i><b><a><a><a><a>

स्निपेट का विस्तार करें

— darrylyeo
स्रोत

7

ग्राफिक्समैजिक (?), 96 बाइट्स

gm convert -size 32x32 xc:red -fill #fff -draw "rectangle 13,6 18,25 rectangle 6,13 25,18" 1.bmp

सुनिश्चित नहीं है कि जीएम के साथ गोल्फ कैसे किया जाए (क्या इसे भाषा के रूप में माना जाना चाहिए?)। यह भी सुनिश्चित नहीं है कि यहां बाइट कैसे गिनें ...

GM इंस्टॉल होने के साथ, विंडोज़ cmd में दिए गए कोड को टाइप करें, आपको नाम के साथ एक छवि मिलेगी 1.bmp। यदि आप बैश का उपयोग कर रहे हैं, तो आप डबल उद्धरण को एकल उद्धरण में बदल सकते हैं (यह काम करना चाहिए, लेकिन मैंने इसका परीक्षण नहीं किया था)।

डिजिटल ट्रामा के लिए धन्यवाद। केवल -draw8 बाइट बचाने के लिए उपयोग करें

— TSH
स्रोत

यकीन नहीं है कि अगर ग्राफिक्समैगिक में इसका समान है, लेकिन इमेजमैजिक के साथ आप दोनों आयतों को एक ही -drawतार में रख सकते हैं :convert -size 32x32 xc:red -fill white -draw "rectangle 13,6 18,25 rectangle 6,13 25,18" i.png

— डिजिटल ट्रामा

@DigitalTrauma वही है। संपादित।

— tsh

7

जावास्क्रिप्ट + एचटीएमएल, 99 + 13 = 112 बाइट्स

सहेजी गयी 2 करने के लिए धन्यवाद बाइट्स user2428118
सहेजी गयी लिए 2 बाइट्स धन्यवाद माथिउस Avellar

JSFiddle

with(c.getContext`2d`)fillStyle='red',fillRect(0,0,32,32),clearRect(6,13,20,6),clearRect(13,6,6,20)

<canvas id=c>

स्निपेट का विस्तार करें

शुद्ध जावास्क्रिप्ट, 194 129 बाइट्स

JSFiddle

with(document.write`<canvas id=c>`,c.getContext`2d`)fillStyle='red',fillRect(0,0,32,32),clearRect(6,13,20,6),clearRect(13,6,6,20)

स्निपेट का विस्तार करें

2

मेरा मानना है कि आपको यह स्क्रैच से करना होगा।

— स्टीफन

@StepHen। ठीक है, मैंने इसे भी जोड़ा।

1

... आपको इसे bytecount में शामिल करने की आवश्यकता है

— ASCII-only

@ ASCII-केवल। शामिल।

1

भविष्य के संदर्भ के लिए, जब भी आपको आवश्यकता हो आप <canvas>अपने उत्तर में सीधे HTML शामिल कर सकते हैं। देखें codegolf.stackexchange.com/a/136972/47097

— darrylyeo

6

HTML4 (?) में जावास्क्रिप्ट (ES6) 178 176 बाइट्स

document.write('<table cellspacing=0>'+[...Array(32)].map((_,y,p)=>p.map((_,x)=>`<td bgcolor=${x>5&&x<26&&y>12&&y<19||y>5&&y<26&&x>12&&x<19?'#fff':'red'}>`).join``).join`<tr>`)

स्निपेट का विस्तार करें

हाँ! हम की जरूरत नहीं है <canvas>और न ही <svg>या यहां तक कि <img>!

जस्टिन मेरिनर के लिए धन्यवाद, 2 बाइट्स बचाएं।

— TSH
स्रोत

5

Löve2D , 139 138 बाइट्स

l=love g=l.graphics c=g.setColor r=g.rectangle f="fill"w=255 l.draw=loadstring"c(w,0,0)r(f,0,0,32,32)c(w,w,w)r(f,13,6,6,20)r(f,6,13,20,6)"

ThePirateBay के लिए एक बाइट धन्यवाद दिया

Ungolfed

function love.draw()
    love.graphics.setColor(255,0,0)
    love.graphics.rectangle("fill",0,0,32,32)
    love.graphics.setColor(255,255,255)
    love.graphics.rectangle("fill",13,6,6,20)
    love.graphics.rectangle("fill",6,13,20,6)
end

— Ataco
स्रोत

5

पायथन 3 , 190 बाइट्स

आउटपुट को सहेजें image.xpmऔर अपने पसंदीदा टेक्स्ट एडिटर के साथ खोलें।

r=range;print('! XPM2\n32 32 2 1\nr c #FF0000\nw c #FFFFFF\n');d=[bytearray(b'r'*32)for _ in r(32)]
for i in r(20):
 for j in r(6):d[i+6][j+13]=d[j+13][i+6]=119
print(b'\n'.join(d).decode())

इसे ऑनलाइन आज़माएं!

आउटपुट:

! XPM2
32 32 2 1
r c #FF0000
w c #FFFFFF

rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrwwwwwwwwwwwwwwwwwwwwrrrrrr
rrrrrrwwwwwwwwwwwwwwwwwwwwrrrrrr
rrrrrrwwwwwwwwwwwwwwwwwwwwrrrrrr
rrrrrrwwwwwwwwwwwwwwwwwwwwrrrrrr
rrrrrrwwwwwwwwwwwwwwwwwwwwrrrrrr
rrrrrrwwwwwwwwwwwwwwwwwwwwrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrwwwwwwrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr

— एंड्रयू दुनाई
स्रोत

मुझे लाइनक्स पर जिम्प के साथ इसे खोलने के लिए खाली 5 वीं लाइन को हटाना पड़ा।

— टिम

5

पर्ल 5 , 184 बाइट्स

176 बाइट्स कोड + 8 के लिए -Mutf8 -p।

मुझे पूरी तरह से यकीन नहीं है कि यह आवश्यक है, यह इस मेटा पोस्ट के अनुसार आपूर्ति किए जा रहे खाली इनपुट पर निर्भर करता है , जो टीआईओ पर काम नहीं करता है इसलिए यह एक नई लाइन (जिसका उपयोग नहीं किया गया है) की आपूर्ति करता है। आउटपुट टर्मिनल के लिए है और इस तरह दिखता है:

अनुपात एक वर्ण स्थान के आधार पर दो लंबवत 'पिक्सेल' होने चाहिए।

%a=qw(R 101 W 107 A 101;97 B 91;107);$_=R.($a="32 
"x3).($b="13 W6 R13 
"x3)."6 A7▄W6 A7▄"."R6 
6 W20 "x2 ."R6 
6 B7▄W6 B7▄R6 
$b$a";s/\d+(.)/$1x$&/ge;s/\pL/[$a{$&}m/g

इसे ऑनलाइन आज़माएं!

आप TIO से कॉपी करके और यहां पेस्ट करके आउटपुट का पूर्वावलोकन कर सकते हैं (यह तत्व पर मँडराते समय नियंत्रण वर्ण दिखाता है) ।

— डोम हेस्टिंग्स
स्रोत

5

जीएफए बुनियादी (अटारी एसटी), 62 बाइट्स

एक .LST प्रारूप में मैन्युअल रूप से संपादित लिस्टिंग। CRअंतिम एक सहित सभी लाइनें समाप्त हो जाती हैं ।

DEFFILL2
PBOX0,0,31,31
DEFFILL0
PBOX13,6,18,25
PBOX6,13,25,18

विस्तृत और टिप्पणी:

DEFFILL 2         ! set fill color: default system color #2 is red (&H700)
PBOX 0,0,31,31    ! draw the red square
DEFFILL 0         ! set fill color: default system color #0 is white (&H777)
PBOX 13,6,18,25   ! draw a vertical white rectangle
PBOX 6,13,25,18   ! draw a horizontal white rectangle

उत्पादन

आउटपुट 32x32 है।

एनबी: यह वास्तव में 'सफेद' रंग का उपयोग कर रहा है, हालांकि यह एमुलेटर पर ग्रे दिख रहा है (और असली चीज़ पर भी, जब तक कि आप चमक को बहुत अधिक न मोड़ लें)।

— Arnauld
स्रोत

5

आर, 171 140 बाइट्स।

x = rep(c(6,13,19,26,19,13),e=2)
l=c(0,32)
par(bg="red",mar=0*1:4)
plot(0,0,'n',l,l,xaxs="i",yaxs="i")
polygon(x,c(x,x)[4:15],c="white",b=0)

(कुछ हद तक)

x <- rep(c(6,13,19,26,19,13),each=2)
y <- c(x,x)[4:15] # index by 3 positions
par(bg="red",mar=c(0,0,0,0)) # prepare the plot space
plot(0,type='n', xaxs="i",yaxs="i",xlim=c(0,32),ylim=c(0,32))
polygon(x,y,col="white",border=0)

कुछ बाइट्स बचाने के लिए @gregor को धन्यवाद

चलाओ!

— एलेक्स एक्स्टेलम
स्रोत

1

साइट पर आपका स्वागत है! :)

— DJMcMayhem

अच्छा! : आप तर्क नामों में से आंशिक मेल के साथ काफी कुछ बाइट्स बचा सकता है e=2के बजाय each=2, tके बजाय type, cके लिए col, bके लिए border। और 0*1:4से छोटा है c(0,0,0,0)।

— ग्रेगर

वास्तव में आप स्थिति से मेल खाते हुए दूर हो सकते हैं plot: plot(0,0,'n',l,l,xaxs="i",yaxs="i")( m="i"वास्तव में आपको एक बाइट खर्च करना पड़ता है)। इन सबके साथ यह 141 बाइट्स तक नीचे चला जाता है।

— ग्रेगोर

मैं आंशिक मिलान के बारे में पूरी तरह से भूल गया। धन्यवाद!

— एलेक्स अक्थेल्म

युगल अधिक बाइट्स: lऔर xlim/ ylimबस जरूरत नहीं है plot(0:32,0:32,...)। मैंने भी आपके दृष्टिकोण को अनुकूलित किया और इसे नीचे 117 के लिए मिला , rectइसके बजाय इसका उपयोग करpolygon रहा हूं ।

— ग्रेगोर

5

ऑक्टेव, 105 बाइट्स 73 बाइट्स

_{नोट: लाइन फीड स्पष्टता के लिए जोड़ी गई है, बाइट काउंट में शामिल नहीं है}

x(32,32,3)=0;
x(:,:,1)=1;
x(7:26,14:19,:)=1;
x(14:19,7:26,:)=1;
imshow(x*255)

संपादित करें: काफी बाइट्स बचाने के लिए दोष के लिए धन्यवाद !

इधर, करने के लिए धन्यवाद octave-online.net पर परिणाम है sanchises

— bracco23
स्रोत

मैं ऑक्टेव के बारे में निश्चित नहीं हूं, लेकिन MATLAB में निम्नलिखित काम करना चाहिए:x(32,32,3)=0; x(:,:,1)=1; x(7:26,14:19,:)=1; x(14:19,7:26,:)=1; imshow(x*255)

— त्रुटी

BTW: PPCG में आपका स्वागत है !!!

— 15

Octave-online.net चित्रों को दिखाता है।

— Sanchises

5

GIF, 97 बाइट्स

GIF87a    ð  ÿ  ÿÿÿ,         @„©Ëí£œ´Ú;ƒÞXmÞ!ŸŠcyŒj¨,àZê<Cô
:8nïtï‹é‚BJ1tì$1ËKSvb=_ÔªõŠe  ;

सस्ता और बाइट-भारी, लेकिन इसके लायक है।

संपादित करें: कुछ वर्ण ऊपर दिए गए कोड में नहीं हैं, यहाँ GIF के हेक्सडम्प के लिए एक पास्टबिन है।

संपादित करें: ऑनलाइन उपकरण के साथ 97 बाइट्स तक संकुचित।

— एड्रियन झांग
स्रोत

1

ऐसा लगता है कि आपके कोड स्निपेट से कुछ अनपेक्षित वर्ण हटा दिए गए थे। शायद एक हेक्स डंप पोस्टिंग की कोशिश करो।

18

आप भाषा का उच्चारण कैसे करते हैं?

— ओलिवर

1

@ ओलिवर ZHAIF

— नील

1

जिम्प एक GIF फाइल का उत्पादन करता है जो केवल 95 बाइट्स (कई अन्य समाधानों से कम) में समान दिखता है। यहां इसका हेक्स डंप है।

— अर्मिन रीगो

6

जीआईएफ कब से एक प्रोग्रामिंग भाषा है?

— अड्म

4

HTML + जावास्क्रिप्ट (ES6), 13 + 112 = 125 बाइट्स

C=c.getContext`2d`
C[s='fillStyle']='red'
C[r='fillRect'](0,0,32,32)
C[s]='#fff'
C[r](6,13,20,6)
C[r](13,6,6,20)

<canvas id=c>

स्निपेट का विस्तार करें

HTML + जावास्क्रिप्ट (ES6), 13 + 114 = 127 बाइट्स

with(c.getContext`2d`)fillStyle='red',fillRect(0,0,32,32),fillStyle='#fff',fillRect(6,13,20,6),fillRect(13,6,6,20)

<canvas id=c>

स्निपेट का विस्तार करें

— darrylyeo
स्रोत

मैंने आपके आयत के दृष्टिकोण को चुरा लिया है और इसे सुधार कर 117 बाइट्स का उपयोग कर clearRectरहा है, मुझे आशा है कि आप इसके साथ ठीक हैं?

यह चतुर है, लेकिन दुर्भाग्य से ओपी का कहना है कि पारदर्शी पिक्सल की अनुमति नहीं है। codegolf.stackexchange.com/questions/136927/draw-the-swiss-flag/…

— darrylyeo

वास्तव में, यह है सफेद। डिफ़ॉल्ट रूप से, सभी वेबपृष्ठों की सफेद पृष्ठभूमि होती है और ध्वज स्वयं पारदर्शी होता है, लेकिन यह पारदर्शिता की आंतरिक परिभाषा है। पारदर्शिता की बाहरी परिभाषा यह होगी कि उस क्षेत्र में पिक्सल (सफेद प्लस) कुछ स्थितियों में अपना रंग बदल सकता है (या यादृच्छिक रूप से सेट किया जा सकता है)। हालांकि, क्योंकि मैं HTML और जावास्क्रिप्ट दोनों का उपयोग कर रहा हूं, इसलिए संपूर्ण आउटपुट सफेद क्रॉस के साथ लाल झंडा है । आप कैनवास और पृष्ठभूमि को अलग-अलग नहीं मान सकते। कैनवास को पृष्ठभूमि पर कैसे प्रदर्शित किया जाता है, इसे अच्छी तरह से परिभाषित किया गया है और परिणाम में हमेशा विशिष्ट परिभाषाओं द्वारा सफेद क्रॉस होता है।

मुझे उम्मीद है कि अब यह थोड़ा और स्पष्ट होगा, मेरा मतलब है कि आप असहमत हो सकते हैं, लेकिन अगर आप वास्तव में इसके बारे में सोचते हैं तो मुझे यकीन है कि आपको मेरा जवाब पूरी तरह से ओपी की आवश्यकताओं के अनुरूप मिलेगा।

@PirateBay मेला काफी

— darrylyeo

4

C # 265/266 209 बाइट्स

 using System;using c=System.Console;class P{static void Main(){for(int i=0,j;i<32;i++){for(j=0;j<32;j++){if((6<i&&i<26&&j>13&&j<19)||(6<j&&j<26&&i>13&&i<19))c.BackgroundColor=ConsoleColor.White;else c.BackgroundColor=ConsoleColor.Red;c.Write(" ");}c.WriteLine();}}}

मैंने बैकग्राउंड कलर बदलते समय कंसोल में "स्पेस" अक्षर लिखे। लेकिन अगर आपको लगता है कि यह बहुत लंबा है और आप एकल वर्ण को 8 x 16 पिक्सेल के रूप में गिनते हैं, तो आप बस इस तरह ("1 बाइट) और + c.ReadKey();इसलिए यह बंद हो जाता है"।

  using System;using c=System.Console;class P{static void Main(){for(int i=0,j;i<32;i++){for(j=0;j<64;j++){if((6<i&&i<26&&j>26&&j<38)||(12<j&&j<52&&i>13&&i<19))c.BackgroundColor=ConsoleColor.White;else c.BackgroundColor=ConsoleColor.Red;c.Write(" ");}c.WriteLine();} c.ReadKey(); }}

56 बाइट्स ने TheLethalCoder को धन्यवाद दिया

 namespace System{using static Console;class P{static void Main(){for(int i=0,j;i<32;i++,WriteLine())for(j=0;j<32;Write(""))BackgroundColor=(ConsoleColor)((6<i&i<26&j>13&j<19)|(j++<26&i>13&i<19&6<j)?15:12);}}}

— जान इवान
स्रोत

209 बाइट्स

namespace System{using static Console;class P{static void Main(){for(int i=0,j;i<32;i++,WriteLine())for(j=0;j<32;Write(" "))BackgroundColor=(ConsoleColor)((6<i&i<26&j>13&j<19)|(6<j&j++<26&i>13&i<19)?15:12);}}}

— TheLethalCoder

4

टिक्ज, 145 143 बाइट्स

\documentclass[tikz]{standalone}\begin{document}\tikz{\def~{)rectangle(}\fill[red](,~33,33);\fill[white](7,14~27,20)(14,7~20,27)}\end{document}

यहाँ यह "अनगढ़" है

\documentclass[tikz]{standalone}
\begin{document}
\tikz{
\def~{)rectangle(}
  \fill[red](,~33,33);
  \fill[white](7,14~27,20)(14,7~20,27)
}\end{document}

यहाँ यह थोड़ा और अधिक ungolfed है

\documentclass[tikz]{standalone}
\begin{document}
\tikz{
  \fill[red](1,1)rectangle(33,33);
  \fill[white](7,14)rectangle(27,20)(14,7)rectangle(20,27)
}\end{document}

यह 3 आयतों को एक बड़ा लाल बनाता है और दो छोटे सफेद प्लस के लिए।

यहाँ यह कैसा दिखता है। यह वास्तव में दूसरों की तुलना में किसी भी अलग नहीं दिखता है।

— गेहूं का जादूगर
स्रोत

मैंने कुछ हफ्ते पहले documentclass जीथब पर एक गोल्फिंग लगाई । और किसी भी खिड़की की पृष्ठभूमि की आवश्यकता नहीं लगती है। इसके साथ ही \documentclass{g}\input tikz5 बी को बचाने के लिए काम करना चाहिए। आप शायद सादा TeX में काम करके अधिक बचा सकते हैं , यहां तक कि TikZ के साथ

— क्रिस H

4

आर, 109 बाइट्स

par(mar=0*1:4,bg=2,xaxs="i",yaxs="i")
frame()
rect(a<-c(6,13)/32,rev(a),b<-c(26,19)/32,rev(b),c="white",b=NA)

frameप्लॉट प्रीसेट करने से बचने के लिए उपयोग करता है, लेकिन डिफॉल्ट प्लॉटिंग क्षेत्र [0,32] के बजाय अंतराल [0,1] पर है। इस तथ्य का उपयोग करता है कि rectवेक्टरकृत है। प्लॉटिंग विंडो का डिफ़ॉल्ट आकार 7in x 7in है। यह निम्नलिखित आउटपुट देता है:

आर, 125 बाइट्स

png()
par(mar=0*1:4,bg=2,xaxs="i",yaxs="i")
frame()
rect(a<-c(6,13)/32,rev(a),b<-c(26,19)/32,rev(b),c="white",b=NA)
dev.off()

डिफ़ॉल्ट के लिए png480x480 पिक्सेल का एक वर्ग है। आउटपुट निम्न png फ़ाइल है:

— plannapus
स्रोत

4

आर, 112 बाइट्स

par(bg=2,mar=0*1:4)
plot(0:32,0:32,'n',xaxs="i",yaxs="i")
rect(c(6,13),c(13,6),c(26,19),c(19,26),c="white",b=NA)

हालांकि, पहलू अनुपात की गारंटी के लिए, हमें कुल 117 के लिए 5 और बाइट्स की आवश्यकता है:

par(bg=2,mar=0*1:4)
plot(0:32,0:32,'n',xaxs="i",yaxs="i",as=1)
rect(c(6,13),c(13,6),c(26,19),c(19,26),c="white",b=NA)

एलेक्स एक्षेल्म के जवाब से बहुत सारी प्रेरणा के साथ , और कुछ और बाइट्स बचाने के लिए रिफ्ट का धन्यवाद।

— ग्रेगर
स्रोत

3

आप 4 बाइट्स को बदल bg="red"सकते हैं bg=2जो डिफ़ॉल्ट पैलेट में समान है

— Rift

4

पोस्टस्क्रिप्ट, 301 286 187 बाइट्स

/m{moveto}def
/s{setrgbcolor}def
/r{rlineto}def
/c{closepath fill}def
1 0 0 s
0 0 m
0 320 r
320 0 r
0 -320 r
c
1 1 1 s
130 60 m
60 0 r
0 200 r
-60 0 r
c
60 130 m
0 60 r
200 0 r
0 -60 r c

अनाम संपादक का धन्यवाद जिन्होंने 99 बाइट की कमी का सुझाव दिया !

— ceilingcat
स्रोत

बस आपको यह बताने के लिए: किसी ने इस पोस्ट के लिए एक गोल्फ संपादन प्रस्तुत किया। हमारी नीति के अनुसार, इसे अस्वीकार कर दिया गया था, लेकिन आप कुछ परिवर्तनों को लागू करने पर विचार कर सकते हैं।

— 19

3

लाल , 79 बाइट्स

कोड:

view[base 32x32 red draw[fill-pen white pen off box 6x13 26x19 box 13x6 19x26]]

नतीजा:

स्पष्टीकरण:

view [              ; activate view engine
base 32x32 red      ; draw a 32 by 32 red box as base
 draw [             ; draw on top of the base
  fill-pen white    ; fill color is white
  pen off           ; turn off outline, alternatively could use white
  box 6x13 26x19    ; draw a horizontal rectangle, specified as 2 corners XxY
  box 13x6 19x26    ; draw vertical rectangle
]]

— जीकी आई
स्रोत

3

बिटमैप, 160 बाइट्स

यहां 24-बिट रंग परिभाषा का उपयोग करके 1-बिट रंग गहराई के साथ एक बिटमैप है। दूसरी पंक्ति का अंतिम छह बाइट्स पैलेट है और इसके बाद का पिक्सेल सरणी है। हर चार बाइट में पिक्सेल की एक पूरी पंक्ति होती है।

42 4D A0 00 00 00 00 00 00 00 20 00 00 00 0C 00
00 00 20 00 20 00 01 00 01 00 00 00 FF FF FF FF
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
00 00 00 00 00 00 00 00 00 07 E0 00 00 07 E0 00
00 07 E0 00 00 07 E0 00 00 07 E0 00 00 07 E0 00
00 07 E0 00 03 FF FF C0 03 FF FF C0 03 FF FF C0
03 FF FF C0 03 FF FF C0 03 FF FF C0 00 07 E0 00
00 07 E0 00 00 07 E0 00 00 07 E0 00 00 07 E0 00
00 07 E0 00 00 07 E0 00 00 00 00 00 00 00 00 00
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00

मैंने अनुगामी शून्य को कम करने की कोशिश की, लेकिन छवि दर्शकों को आवश्यकता है कि पूरे कैनवास के लिए पर्याप्त पिक्सेल परिभाषित हों।

— हाथ-ए-खाना
स्रोत

3

"कोई सुझाव जहां मैं स्थायी रूप से मनमानी फ़ाइलों को बचा सकता हूं?" - गितहब पर।

1

आप RLE एन्कोडिंग का उपयोग कर सकते हैं?

— नील

1

हाहा, आपने मेरा GIF उदाहरण 1up किया होगा।

— एड्रियन झांग

1

मुझे लगता है कि यह एक मान्य प्रोग्रामिंग भाषा नहीं है। IFAICT, BMP न तो प्रधानता की जाँच कर सकता है, न ही संख्याएँ जोड़ सकता है।

— अड्म

3

कृपया ध्यान दें कि हम इस आम सहमति के अनुसार गैर-प्रोग्रामिंग-भाषा प्रस्तुतियाँ की अनुमति देते हैं , इसलिए यह सबमिशन पूरी तरह से ठीक है। (और IMO के लिए एक अच्छा बेंचमार्क है।)

— निर्दोष

3

पायथन 2, 92 91 89 बाइट्स

r,w=' \0\0',' '*3
A,B=192*r,(13*r+6*w+13*r)*7
print"P6 "+"32 "*3+A+B+(6*r+20*w+6*r)*6+B+A

बाइनरी पीपीएम के रूप में आउटपुट, उपयोग:

python golf_swiss.py > swiss.ppm

रंग की गहराई बढ़ाने से मुझे अधिकतम मूल्य के लिए जगह का उपयोग करने की अनुमति मिली

— कार्ल नेफ
स्रोत

3

Tcl / Tk, 94

यह इंटरैक्टिव खोल पर चलता है, तो एक संक्षिप्त कर सकते हैं canvasकरने के लिए canऔर gridकरने के लिएgri

gri [can .c -bg red -w 32 -he 32]
lmap R {{8 15 28 21} {15 8 21 28}} {.c cr r $R -f #FFF -w 0}

~~Tcl / Tk, 98~~

यदि यह इंटरेक्टिव शेल पर चलता है, तो व्यक्ति संक्षिप्त कर सकता canvasहैcan

grid [can .c -bg red -w 32 -he 32]
.c cr r 8 15 28 21 -f #FFF -w 0
.c cr r 15 8 21 28 -f #FFF -w 0

Tcl / Tk, 101

pack [canvas .c -bg red -w 32 -he 32] .c cr r 8 15 28 21 -f #FFF -w 0 .c cr r 15 8 21 28 -f #FFF -w 0

— sergiol
स्रोत

स्विस फ्लैग ड्रा करें

एसवीजी (एचटीएमएल 5), 94 83 82 64 बाइट्स

डॉस, 43 बाइट्स के लिए x86-16 मशीन कोड

MATL , 29 बाइट्स

व्याख्या

जावा 8, 246 + 42 = 288 बाइट्स

Ungolfed

नतीजा

एक्सेल VBA, 86 85 79 बाइट्स

कोड

उत्पादन

सी ++, एसएफएमएल, 406 399 394 बाइट्स

ब्रिंद्रा, 227 बाइट्स (गैर-प्रतिस्पर्धात्मक) (वास्तव में काम करने के लिए अद्यतन)

TI-BASIC (TI-84 Plus C (S) E only), 58 बाइट्स

मैथेमेटिका, 83 बाइट्स

गणितज्ञ, २३ बाइट्स

HTML + CSS, 15 + 117 बाइट्स = 132 बाइट्स

HTML + CSS, 18 + 139 137 122 बाइट्स = 140 बाइट्स

ग्राफिक्समैजिक (?), 96 बाइट्स

जावास्क्रिप्ट + एचटीएमएल, 99 + 13 = 112 बाइट्स

शुद्ध जावास्क्रिप्ट, 194 129 बाइट्स

HTML4 (?) में जावास्क्रिप्ट (ES6) 178 176 बाइट्स

Löve2D , 139 138 बाइट्स

Ungolfed

पायथन 3 , 190 बाइट्स

पर्ल 5 , 184 बाइट्स

जीएफए बुनियादी (अटारी एसटी), 62 बाइट्स

उत्पादन

आर, 171 140 बाइट्स।

ऑक्टेव, 105 बाइट्स 73 बाइट्स

GIF, 97 बाइट्स

HTML + जावास्क्रिप्ट (ES6), 13 + 112 = 125 बाइट्स

HTML + जावास्क्रिप्ट (ES6), 13 + 114 = 127 बाइट्स

C # 265/266 209 बाइट्स

टिक्ज, 145 143 बाइट्स

आर, 109 बाइट्स

आर, 125 बाइट्स

आर, 112 बाइट्स

पोस्टस्क्रिप्ट, 301 286 187 बाइट्स

लाल , 79 बाइट्स

कोड:

नतीजा:

स्पष्टीकरण:

बिटमैप, 160 बाइट्स

पायथन 2, 92 91 89 बाइट्स

Tcl / Tk, 94

Tcl / Tk, 98

Tcl / Tk, 101

एक्सेल VBA, _{86 85} 79 बाइट्स