सेल्फ-वैलिडेटिंग ट्राइंगुलर चेकरबोर्ड प्रोग्राम


10

एक चेकबोर्ड कार्यक्रम एक ऐसा कार्यक्रम है जहां प्रत्येक व्यक्ति के चरित्र का क्रमिक मान विषम से भी विषम होता है, लाइन टर्मिनेटर (जो कि किसी भी मानक लाइन-एंडिंग हो सकता है) को छोड़कर।

एक त्रिकोणीय कार्यक्रम एक ऐसा कार्यक्रम है जहां प्रत्येक पंक्ति में पूर्ववर्ती रेखा की तुलना में एक अतिरिक्त चरित्र होता है, जिसमें पहली पंक्ति में एक वर्ण होता है। आपको खाली इनपुट को संभालने की आवश्यकता नहीं है।

आपका कार्य एक ऐसे प्रोग्राम का निर्माण करना है जो यह पुष्टि करता है कि दिए गए इनपुट उन मानदंडों और आउटपुट का पालन करते हैं / अगर कुछ मानदंड पूरा करते हैं, तो सत्यता लौटाते हैं या अन्यथा कुछ गलत है।

आपके कार्यक्रम को भी इन मानदंडों को पूरा करना चाहिए।

मान्य कार्यक्रमों के उदाहरण

G
`e
@u^
5r{B

^
cB
+$C
VA01

नियम

  • आपका कार्यक्रम या तो एक विषम या यहां तक ​​कि बाइट के साथ शुरू हो सकता है जब तक कि वर्णों की समानता।
  • आपके प्रोग्राम को ऐसे कार्यक्रमों को मान्य करना होगा जो किसी विषम या सम वर्ण से शुरू होते हैं।
  • यूनिकोड वर्णों के लिए, अंतर्निहित बाइट मूल्यों में वैकल्पिक समता होनी चाहिए।
  • आप मान सकते हैं कि इनपुट में केवल मुद्रण योग्य वर्ण हैं। यदि आपके प्रोग्राम में अनप्रिंटर्स हैं, तो यह अभी भी खुद को वैलिडेट करने में सक्षम होना चाहिए।
  • आपके कार्यक्रम में एक अनुगामी नई पंक्ति शामिल हो सकती है, इसे आपकी मान्यता द्वारा अनुमति देने की आवश्यकता नहीं है क्योंकि आप मान सकते हैं कि इसे मान्य करने से पहले हटा दिया गया है।
  • मानक खामियों को मना किया जाता है।
  • प्रत्येक भाषा में बाइट्स में सबसे छोटा कोड, जीतता है।

@MartinEnder आपके इनपुट के लिए धन्यवाद! उम्मीद है कि यह अब स्पष्ट है। इससे संबंधित, क्या मुझे इसे सैंडबॉक्स में अधिक समय तक छोड़ देना चाहिए?
डोम हेस्टिंग्स

1
क्षैतिज और ऊर्ध्वाधर दोनों समान / विषम है? मैं "चेकबोर्ड" से हाँ मानता हूँ, लेकिन मैं नहीं कहता कि आप ऐसा कहाँ कहते हैं।
टन हास्पेल

@DomHastings एक सप्ताह ठीक लगता है। यदि आपको कुछ दिनों के बाद कोई प्रतिक्रिया नहीं मिलती है, तो आप चैट में पूछ सकते हैं कि क्या किसी और की कोई टिप्पणी है।
मार्टिन एंडर

1
@TonHospel मेरी मूल उदाहरण ऐसा किया, लेकिन यह मेरी विवरण के साथ खण्डन किया है, तो यह लागू करने के लिए, नहीं, यह होना चाहिए: E\nOE\nOEO। उम्मीद है की वो मदद करदे!
डोम हेस्टिंग्स

2
मेरी राय: जवाब मान लें कि इनपुट एक नई रेखा के साथ शुरू या समाप्त नहीं होता है।
लिन

जवाबों:


3

स्टेक्स , 26 बाइट्स

L
Y$
i:-
 {2%
*OFyF
%vi =*

परीक्षण मामलों को ऑनलाइन चलाएं

मुझे 3 जंक पात्रों का परिचय देना था। iसभी लूपों के बाहर होने पर नो-ओप होता है। हमेशा एक नहीं है। Oस्टैक के शीर्ष के नीचे एक 1 टक, लेकिन प्रोग्राम में मान का उपयोग नहीं किया गया है।

LY      move input lines into a list and store in Y register
$       flatten
i       no-op
:-      get pairwise differences
{2%*OF  foreach delta, mod by 2, and multiply, then tuck a 1 under the top of stack
yF      foreach line in original input do...
  %v    subtract 1 from length of line
  i=    is equal to iteration index?
  *     multiply

इसको चलाओ


अरे, मुझे आशा है कि यह आपके कोड के साथ बहुत अधिक गड़बड़ नहीं करता है, लेकिन आप अग्रणी newline सत्यापन को छोड़ सकते हैं।
डोम हेस्टिंग्स

8

सी (जीसीसी), 189 बाइट्स

j
;l
;b;
d;f␉
(char
␉*␉t) 
{b=*␉t%
2;for␉(␉
j=d=0;j=j
+ 1,␉l=j+ 
1,␉*␉t; ) {
for␉(;l=l- 1
 ;t=t+ 1 )b= 
!b␉,␉d=d+ !(␉*
␉t␉*␉(␉*␉t- 10)
*␉(␉*␉t%2-b) ) ;
d␉|=*␉t- 10;t=t+ 
1 ; }b= !d; } ␉ ␉ 

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

एक टैब चरित्र का प्रतिनिधित्व करता है (मुझे क्षमा करें)। ध्यान दें कि कई अनुगामी स्थान / टैब हैं (मुझे अधिक खेद है)। टैब अक्ष के साथ मूल को सबसे अच्छे रूप में देखा जाता है :set tabstop=1(शब्दों से व्यक्त नहीं किया जा सकता कि मुझे कितना खेद है)।

यह एक फ़ंक्शन (कहा जाता है f, जो उस पर नज़र रखने से तुरंत स्पष्ट नहीं है) जो एक तर्क के रूप में एक स्ट्रिंग लेता है और 0या तो वापस लौटता है 1

मैं इसे कम से कम एक और शायद दो या अधिक लाइनों द्वारा कम कर सकता था , लेकिन ध्यान दें कि यह अंत में तेजी से गन्दा और कम प्रयास करता है, ज्यादातर क्योंकि इस तरह के भयानक कोड (पीपीसीजी मानकों द्वारा भी) लिखना मुझे एक बुरे व्यक्ति की तरह महसूस करवा रहा था। और मैं जल्द से जल्द रोकना चाहता था।

यहाँ मूल विचार निर्माण जरूरी है कि प्रारूप (तोड़ने से बचने के लिए है ++, +=, return, आदि)। चमत्कारिक रूप से, महत्वपूर्ण कीवर्ड जैसे for, charऔर while(जो मैंने उपयोग नहीं किया था) वैकल्पिक समता नियम को फिट करने के लिए होता है। तब मैंने रिक्त स्थान (यहां तक ​​कि समता) और टैब (विषम समता) का उपयोग किया, बाकी को नियम बनाने के लिए पैडिंग के रूप में।


1
मुझे C में समाधान देखने की उम्मीद नहीं थी!
डोम हेस्टिंग्स

यदि आप TIO में प्रोग्राम के समाधान भाग को "हैडर" और "फुटर" खंडों में डालकर अलग करते हैं, तो लोगों के लिए बाइट काउंट को सत्यापित करना आसान हो जाता है।
जैकब

4

हास्केल , 1080 1033 बाइट्स

;
f=
 g 
ij=f
a =hi
hi = g
hij= ij
g ' ' =0
g '"' =0;
 g '$' =0;
 g '&' =0-0
g '(' =0-0-0
g '*' =0-0-0;
 g ',' =0-0-0;
 g '.' =0-0-0-0
g '0' =0-0-0-0-0
g '2' =0-0-0-0-0;
 g '4' =0-0-0-0-0;
 g '6' =0; g '8' =0
g ':' =0; g '<' =0-0
g '>' =0; g '@' =0-0;
 g 'B' =0; g 'D' =0-0;
 g 'F' =0; g 'H' =0-0-0
g 'J' =0; g 'L' =0-0-0-0
g 'N' =0; g 'P' =0-0-0-0;
 g 'R' =0; g 'T' =0-0-0-0;
 g 'V' =0; g 'X' =0-0-0-0-0
g 'Z' =0; g '^' =0; g '`' =0
g 'b' =0; g 'd' =0; g 'f' =0;
 g 'h' =0; g 'j' =0; g 'l' =0;
 g 'n' =0; g 'p' =0; g 'r' =0-0
g 't' =0; g 'v' =0; g 'x' =0-0-0
g 'z' =0; g '\92' =0-0; g '|' =0;
 g '~' =0; g y = 1 ;z=0; i(-0)z=z;
 i m('\10':y ) ="y"; ; ; ; ; ; ; ; 
i m(mnmnmnmnm:y ) = i(m - 1 ) y ; ; 
i k m ="y"; ; k i [ ] =01<1010101010;
 k m('\10':y ) = k(m + 1 )(i m y ) ; ;
 k m y =01>10; m o = k 1$'\10':o ; ; ; 
o i('\10':y ) = o i y ; ; ; ; ; ; ; ; ; 
o i(k:y )|g k<i = o(1 - i ) y ; ; ; ; ; ;
 o i(k:y )|g k>i = o(1 - i ) y ; ; ; ; ; ;
 o i [ ] =01<10; o i y =01>10;v=01>10101010
s y|o 1 y = m y|o(-0) y = m y ; s y =v; ; ; 

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

व्याख्या

हास्केल के लिए यह काफी दिलचस्प काम रहा है।

समानता

शुरू करने के लिए हमें यह निर्धारित करने के कुछ तरीके की आवश्यकता होती है कि क्या चरित्र में समान या विषम कोड-बिंदु है। सामान्य तरीका यह हो सकता है कि कोड-पॉइंट प्राप्त करने के लिए और इसे 2 से मॉड किया जाए। हालांकि, जैसा कि किसी को पता हो सकता है, किसी वर्ण के कोड-पॉइंट को प्राप्त करने के लिए एक आयात की आवश्यकता होती है, जो स्रोत प्रतिबंध के कारण इसका मतलब है कि यह नहीं हो सकता है उपयोग किया गया। एक अधिक अनुभवी हास्केलर पुनरावृत्ति का उपयोग करने के लिए सोचेंगे। हम टाइपकास्टियों Charका हिस्सा हैं Enumइसलिए हम उनके पूर्ववर्तियों और उत्तराधिकारियों को प्राप्त कर सकते हैं। हालांकि predऔर succक्योंकि वे वैकल्पिक बाइट समता नहीं है भी दोनों व्यर्थ कर रहे हैं।

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

समस्या बाइट्स

आप देख सकते हैं कि कुछ बाइट्स ऐसे भी हैं जिनके लिए सिंगल-कोट्स में रैप करके शाब्दिक नहीं बनाया जा सकता है। वे unprintables, newlines और हैं \। जब तक हम उनमें से किसी का भी उपयोग नहीं करते हैं, तब तक हमें unprintables के बारे में चिंता करने की आवश्यकता नहीं है। वास्तव में, हम अभी भी टैब की तरह अजीब unprintables का उपयोग कर सकते हैं, मैं अभी जरूरत नहीं है। न्यूलाइन को काफी हद तक नजरअंदाज किया जा सकता है क्योंकि इसे प्रोग्राम से वैसे भी ट्रिम किया जाएगा। (हम न्यूलाइन शामिल कर सकते हैं, क्योंकि यह कोड-पॉइंट बल्कि सुविधाजनक है, लेकिन हमें इसकी आवश्यकता नहीं है)। यह पत्तियां \, अब \कोडपॉइंट 92 है, जो आसानी से एक विषम संख्या है जिसके बाद सम संख्या है, इसलिए यह पूरी तरह से मान्य है। बाद में जब हमें न्यूलाइन का प्रतिनिधित्व करने की आवश्यकता होती है तो हम ध्यान देंगे कि यह सौभाग्य से इसी संपत्ति के पास है ।\92 इस तरह से शाब्दिक रूप से evens और बाधाओं के बीच वैकल्पिक होता है'\92''\10'

समस्याओं को दूर करना

अब वास्तविक कोड लिखना शुरू करने के लिए हमें एक पंक्ति में एक बड़ी संख्या में वर्ण डालने में सक्षम होना चाहिए। ऐसा करने के लिए मैंने कैप लिखा:

;
f=
 g 
ij=f
a =hi
hi = g
hij= ij

टोपी कुछ भी नहीं करता है सिवाय मान्य हास्केल के। मुझे शुरू में ऐसी परिभाषाएँ बनाने की उम्मीद थी जो बाद में कोड में हमारी मदद करेगी, लेकिन ऐसा नहीं हुआ। टोपी बनाने के आसान तरीके भी हैं, उदाहरण के लिए व्हॉट्सएप और सेमीकोलन, लेकिन वे इस तरह से बाइट नहीं बचाते हैं इसलिए मैंने इसे बदलने की जहमत नहीं उठाई।

Hardcoder

इसलिए अब जब मेरे पास एक पंक्ति में पर्याप्त स्थान है तो मैं हार्डकॉन्डिंग मान शुरू करता हूं। यह ज्यादातर सुंदर उबाऊ है, लेकिन कुछ चीजें रुचि की हैं। एक बार के लिए लाइनें शुरू होने में अधिक समय लगता है तो हम ;एक लाइन पर कई घोषणाएं करने के लिए उपयोग कर सकते हैं , जो हमें एक टन बाइट्स बचाता है।

दूसरा यह है कि चूंकि हम हमेशा एक पंक्ति को gहर एक के साथ शुरू नहीं कर सकते हैं इसलिए अक्सर हमें लाइनों को थोड़ा सा इंडेंट करना पड़ता है। अब हास्केल वास्तव में इंडेंटेशन की परवाह करता है, इसलिए वह इस बारे में शिकायत करेगा। हालाँकि अगर इंडेंटेड लाइन से पहले आखिरी लाइन अर्धविराम में खत्म हो जाती है तो वह इसे अनुमति देगा। क्यों? मैं बेहोश नहीं हुआ, लेकिन यह काम करता है। इसलिए हमें बस लाइनों के अंत में अर्धविराम लगाने के लिए याद रखना होगा।

बिल्डिंग ब्लॉक्स

एक बार हार्डकॉडर हो जाने के बाद यह कार्यक्रम के अंत तक आसानी से चल रहा है। हमें कुछ सरल कार्यों का निर्माण करने की आवश्यकता है। पहले मैं एक संस्करण का निर्माण करता हूं drop, जिसे कहा जाता है iiइसमें से अलग dropहै कि अगर हम स्ट्रिंग के अंत को छोड़ने का प्रयास करते हैं तो यह वापस लौटता है "y"iड्रॉप से ​​भी अलग है कि अगर यह एक नई लाइन को छोड़ने का प्रयास करता है तो यह वापस आ जाएगा "y", ये उपयोगी होंगे क्योंकि बाद में जब हम यह सत्यापित कर रहे हैं कि प्रोग्राम एक त्रिकोण है, तो यह हमें Falseअंतिम लाइन पूरी नहीं होने पर या जब वापस लौटने की अनुमति देगा एक लाइन जल्दी खत्म होती है।

अगला हमारे पास है kknरोंरोंTruenkn+1False

हम तो के लिए एक उपनाम बनाने k, mmबस है kके साथ 1पहला तर्क में, और एक नई पंक्ति दूसरा तर्क के लिए prepended।

अगला हमारे पास है ooएक संख्या और एक स्ट्रिंग लेता है। यह निर्धारित करता है कि स्ट्रिंग बाइट्स (न्यूलाइन्स को नजरअंदाज करते हुए g) समानता में वैकल्पिक है (हमारा उपयोग करके ) इनपुट नंबर से शुरू होता है।

अंत में हमारे पास sजो oदोनों के साथ चलता है , 1और 0यदि वह सफल हो जाता है तो वह हार जाता है m। यदि यह विफल रहता है तो यह दोनों ही वापस लौटता है False। यह वह फ़ंक्शन है जो हम चाहते हैं। यह निर्धारित करता है कि इनपुट त्रिकोणीय और वैकल्पिक है।


1
एक त्रिकोणीय स्ट्रिंग 1-वर्ण रेखा से शुरू होती है, खाली रेखा नहीं।
जैकब

@ जाकोब मुझे लगता है कि यह गूंगा है, लेकिन यह एक आसान पर्याप्त समाधान था।
तदर्थ गार्फ हंटर

3

05AB1E , 34 26 बाइट्स

¶
¡D
©€g
´ā´Q
´sJÇÈ
¥Ä{´нP

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

इनपुट को मल्टीलाइन स्ट्रिंग ( "" "के बीच इनपुट) के रूप में लेता है । बाद में आने के लिए स्पष्टीकरण।


1
जब तक मैंने नियमों को गलत नहीं समझा, तब तक प्रोग्राम को एक नई पंक्ति के साथ शुरू होने वाले इनपुट को मान्य करने में सक्षम होना चाहिए।
एमिग्ना

@Emigna मुझे लगता है कि आपके कार्यक्रम को एक अग्रणी नई पंक्ति को मान्य करने में सक्षम होना चाहिए, यदि यह स्वयं एक प्रमुख नई पंक्ति से शुरू होता है।
टन हास्पेल

मुझे यह पता नहीं है कि क्या यह सही है (मैं विनिर्देशों को पढ़ने में बहुत उत्सुक हूं): इसे ऑनलाइन आज़माएं!
मैजिक ऑक्टोपस Urn

@MagicOctopusUrn आपका उत्तर मुझे ठीक लगता है, लेकिन मैं इनपुट के बारे में सोच रहा हूं: क्या हमें इसे एक सरणी के रूप में लेने की अनुमति है? आपके लिंक में, आपका पहला इनपुट एक खाली जगह है, न कि एक नई लाइन चार।
कलडो

1
अरे, मुझे आशा है कि यह आपके कोड के साथ बहुत अधिक गड़बड़ नहीं करता है, लेकिन आप अग्रणी newline सत्यापन को छोड़ सकते हैं।
डोम हेस्टिंग्स

1

जावा 10, 209 बाइट्स

एक व्यर्थ का लंबोदर जो एक पुनरावृत्त या सरणी लेता है byte। एक रनटाइम अपवाद को फेंककर, सामान्य रूप से वापस आकर सही इंगित करता है। कार्यक्रम की उम्मीद है कि अंतिम पंक्ति ठीक से समाप्त हो जाएगी, अर्थात एक नई पंक्ति के साथ समाप्त होगी। कार्यक्रम की अंतिम पंक्ति इसी तरह समाप्त की जाती है।

सब कुछ यूटीएफ -8 के तहत किया जाता है, इस व्याख्या के साथ कि "चरित्र" यूनिकोड कोड बिंदुओं को संदर्भित करता है।

इस दृश्य में टैब को स्थान के साथ बदल दिया जाता है।

d
->
{  
long
f= 1,
 h=0 ,
c = - 1
,e ;for 
( byte a:
 d) {var b
=(e = a^10)
<1&e>- 1 ;f=
b?( h ^ f)> 0
?0/0 : f+ 1: f
;h=b?0 :a>-65 ?
h+ 1: h; c =b? c
:c>=0 & ( (c^a )&
1 )<1 ?0/0 :a ; } 
/*1010101010101*/ }

यह ऑनलाइन की कोशिश करो

हेक्स डंप

xxd -p -rयूनिक्स पर वापस जाएं ।

640a2d3e0a7b20090a6c6f6e670a663d20312c0a09683d30092c0a63203d
202d20310a2c65203b666f72090a28096279746520613a0a096429207b76
617209620a3d2865203d20615e3130290a3c3126653e2d2031203b663d0a
623f280968095e0966293e09300a3f302f30093a09662b20313a09660a3b
683d623f30093a613e2d3635203f0a682b20313a09683b2063203d623f20
630a3a633e3d30092609280928635e612029260a3120293c31203f302f30
093a61203b207d200a2f2a313031303130313031303130312a2f207d0a

Ungolfed

d -> {
    long f = 1, h = 0, c = ~h, e;
    for (byte a : d) {
        var b = (e = a^10) < 1 & e > -1;
        f = b ?
            (h^f) > 0 ? 0/0 : f + 1
            : f
        ;
        h = b ? 0 :
            a > -65 ? h + 1 : h
        ;
        c = b ? c :
            c >= 0 & ((c^a) & 1) < 1 ? 0/0 : a
        ;
    }
}

fवर्तमान लाइन पर वर्णों की अपेक्षित संख्या है, वर्तमान पंक्ति hपर अब तक देखे गए वर्णों की संख्या cहै, अंतिम बाइट देखी गई है, और bयह है कि क्या aनई रेखा है।

हालत a > -65परीक्षण करती है कि क्या aएक चरित्र में पहली बाइट है। यह काम करता है क्योंकि एकल-बाइट (ASCII) वर्ण 8-बिट दो के पूरक में nonnegative हैं, लंबे वर्णों की पहली बाइट में द्विआधारी रूप है 11xxxxxx(कम से कम -64 दो पूरक में), और उन वर्णों में गैर-प्रमुख बाइट्स हैं फॉर्म 10xxxxxx, दो-पूरक में अधिकांश -65 पर। ( स्रोत )

जब कोई चरित्र त्रिकोणीय या चेकरबोर्ड पैटर्न का उल्लंघन करता है (यानी एक नई पंक्ति जल्दी या देर से या गलत समानता का एक बाइट दिखाई देता है), तो इसी त्रिगुट की बाईं शाखा (कार्य करने के लिए fया c) सक्रिय होती है और विधि एक अंकगणितीय अपवाद को बढ़ाती है।


0

पायथन 3 (3.4?), 350 बाइट्स

व्हॉट्सएप के बारे में विशेष रूप से पायथन 3 के रूप में एक भाषा के लिए एक कठिन चुनौती। कुछ प्रिंट के लिए सबमिशन प्रिंट 0या 1मानक और क्रैश करने के लिए। कार्यक्रम की उम्मीद है कि अंतिम पंक्ति ठीक से समाप्त हो जाएगी, अर्थात एक नई पंक्ति के साथ समाप्त होगी। कार्यक्रम की अंतिम पंक्ति भी इसी तरह समाप्त की जाती है। यूटीएफ -8 का उपयोग बाइट समता की जांच के लिए किया जाता है।

इस दृश्य में टैब को स्थान के साथ बदल दिया जाता है।

0
i\
= 1
t=(#
 '0'*
 0) ;(
g,) =(#
 open (1
, "w"),) 
k = eval (
'p' + 'rin'
 + 't' ) #01
for  a in (#0
open ( 0) ):#0
#01010101010101
 a = a [:- 1 ] #
 if ( len (a )<i\
or len (a )>i ):[\
k('0' ),1 /0] #0101
 i, t= -~i, t+ a #01
(k( 2-len ({(c^i )&1\
 for  i,c in  eval (#0
 "enu"+"m"+"erate")(#01
 eval ( " byte"+"s")( t#
,' u8' ) ) } ) ) ) #01010

पाइथन 3.4.2 के साथ मेरे लिए काम करता है; TIO पर किसी भी पायथन 3 पर काम नहीं करता है। मुझे TIO के दुभाषियों में एक बग लगता है।

हेक्स डंप

xxd -p -rयूनिक्स पर वापस जाएं ।

300a695c0a3d20310a743d28230a202730272a0a093029203b280a672c29
203d28230a206f70656e0928310a2c09227722292c29200a6b203d206576
616c09280a277027202b202772696e270a202b202774272029202330310a
666f7209206120696e092823300a6f70656e092809302920293a23300a23
30313031303130313031303130310a2061203d2061205b3a2d2031205d20
230a2069660928096c656e09286120293c695c0a6f72096c656e09286120
293e6920293a5b5c0a6b2827302720292c31202f305d2023303130310a20
692c09743d202d7e692c09742b2061202330310a286b2809322d6c656e09
287b28635e69202926315c0a09666f720920692c6320696e09206576616c
092823300a0922656e75222b226d222b2265726174652229282330310a20
6576616c092809220962797465222b22732229280974230a2c2720753827
20292029207d202920292029202330313031300a
हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.