4, 8, 15, 16, 23, 42 [বন্ধ]

90

4, 8, 15, 16, 23, 42

এমন একটি প্রোগ্রাম লিখুন যা সংখ্যার এই ধারাটিকে অসীমভাবে ছাড়িয়ে যায়। তবে, নম্বরগুলি অবশ্যই আপনার উত্স কোডে কোথাও উপস্থিত হবে না।

নম্বরগুলি আউটপুট করার জন্য নিম্নলিখিতটি একটি বৈধ জাভা প্রোগ্রাম নয় কারণ নম্বরগুলি তার উত্স কোডে প্রদর্শিত হচ্ছে:

class TheNumbers {
    public static void main(String[] args) {
        for(int n = 0;;) System.out.println(
            n == 4 ? n = 8 :
            n == 8 ? n = 15 :
            n == 15 ? n = 16 :
            n == 16 ? n = 23 :
            n == 23 ? n = 42 : (n = 4)
        );
    }
}

"নম্বরগুলি অবশ্যই আপনার উত্স কোডে উপস্থিত হবে না" এর সংজ্ঞাটি নিম্নরূপ:

  • আপনার অবশ্যই 4 সংখ্যাটি ব্যবহার করা উচিত নয়।
  • আপনি অবশ্যই 8 সংখ্যাটি ব্যবহার করবেন না।
  • আপনি সংখ্যাটি 1 ব্যবহার করবেন না তারপরে অঙ্ক 5 টি।
  • আপনি সংখ্যাটি 1 ব্যবহার করবেন না তারপরে অঙ্ক 6।
  • আপনি অবশ্যই সংখ্যা 2 ব্যবহার করবেন না তারপরে অঙ্ক 3 টি।

আপনার ভাষা যদি এমন কয়েকটি অক্ষরকে অগ্রাহ্য করে যা সংখ্যার মধ্যে রাখতে পারে তবে এটি কোনও বৈধ প্রতিস্থাপন নয়। উদাহরণস্বরূপ সুতরাং আপনার ভাষা আক্ষরিক ব্যাখ্যা করে যদি 1_5যেমন 15, এই যেমন সংখ্যা 1 সংখ্যা 5 দ্বারা অনুসরণ গণনা করবে।

বিকল্প ঘাঁটিগুলি বিধিনিষেধে অন্তর্ভুক্ত রয়েছে, উদাহরণস্বরূপ:

  • বাইনারি 100 4 এর বিকল্প হিসাবে ব্যবহার করা যায় না।
  • অক্টোটাল 10 8 এর বিকল্প হিসাবে ব্যবহার করা যাবে না।
  • হেক্সাডেসিমাল এফ 15 এর বিকল্প হিসাবে ব্যবহার করা যাবে না।

অতএব, নম্বরগুলি আউটপুট করার জন্য জাভা প্রোগ্রামটি নীচে একটি বৈধ (তবে খুব অনুপ্রাণিত নয়) কারণ সংখ্যাটি তার উত্স কোডটিতে প্রদর্শিত হচ্ছে না:

class TheNumbers {
    public static void main(String[] args) {
        for(int n = '*';;) {
            System.out.println(n -= '&');
            System.out.println(n *= 2);
            System.out.println(n += 7);
            System.out.println(++n);
            System.out.println(n += 7);
            System.out.println(n += 19);
        }
    }
}

নোট করুন যে প্রোগ্রামটিতে, '*'এবং '&'42 এবং 38 পূর্ণসংখ্যার জন্য প্রতিস্থাপিত হয়েছে, কারণ অন্যথায় 4 এবং 8 সংখ্যার উত্স কোডে প্রদর্শিত হবে।

"ক্রম অসীমভাবে আউটপুট করে" এর সংজ্ঞাটি ব্যাখ্যার জন্য উন্মুক্ত। সুতরাং, উদাহরণস্বরূপ, এমন একটি প্রোগ্রাম যা গ্লাইফগুলি "অসীম" আকারে ছোট হওয়া পর্যন্ত আউটপুট করে তা বৈধ হবে।

আপনি যদি কোনওভাবে অনুক্রমটি তৈরি করতে সক্ষম হন তবে মূলত প্রতিটি সংখ্যা হার্ড-কোডিং নয়।

এটি জনপ্রিয়তার প্রতিযোগিতা, তাই সৃজনশীল হন। 26 শে মার্চ সর্বাধিক ভোট সহ উত্তরটি বিজয়ী।

popularity-contest  number  sequence 
— Radiodef
সূত্র
8
আমি 6 টি ডাউনভোট গণনা করতে পারি তবে কোনও মন্তব্য নেই: /
— ভেরিওস
11
@ ভিরিওস, "এটি একটি মূ .় প্রশ্ন" খুব গঠনমূলক নয়, যার কারণেই কেউ এটিকে মন্তব্য হিসাবে পোস্ট করেননি।
— পিটার টেলর
18
এই পৃথিবীতে 11 ধরণের লোক রয়েছে: যারা হারিয়ে গেছে দেখেছেন , যারা করেন নি এবং যারা বাইনারি বোঝেন না তারা।
— চটজলদি ossifrage
7
@ পিটারটেলর নিশ্চিতভাবেই, তবে নতুন আগতরা বেশিরভাগই তা পাবেন না এবং তাদের ভবিষ্যতের প্রশ্নগুলির উন্নতির চেষ্টা করার পরিবর্তে সাইটটি ত্যাগ করবেন না। আমি অনুমান করি যে এটির This isn't an interesting question, IMHO, since the solution is pretty trivial. Please post in the sandbox next time.চেয়ে ভাল হবে This is a stupid question.তবে এটি কেবল আমার ব্যক্তিগত মতামত।
— ভেরিয়স
3
আমি লক্ষ্য করেছি যে প্রশ্নটি অন্যান্য সংখ্যার আউটপুট নিষিদ্ধ করে না । সুতরাং অন্তত অসীম-বানর-তত্ত্ব অনুসারে একটি অযৌক্তিক সিউডো-র্যান্ডম নম্বর জেনারেটরটি কৌশলটি করা উচিত।
— কোজিরো

উত্তর:

233

জাভা

আমি অন্য এন্ট্রি যুক্ত করার সিদ্ধান্ত নিয়েছি কারণ এটি আমার প্রথমটির থেকে সম্পূর্ণ আলাদা (যা উদাহরণের মতো ছিল)।

এই প্রোগ্রামটি ব্যবহারকারী দ্বারা প্রবেশ করা একটি অ্যারের গড় গণনা করে ...

import java.util.Scanner;

public class Numbers {
    public static double getSum(int[] nums) {
        double sum = 0;
        if(nums.length > 0) {
            for(int i = 0; i <= nums.length; i++) {
                sum += nums[i];
            }
        }

        return sum;
    }

    public static double getAverage(int[] nums) { return getSum(nums) / nums.length; }
    public static long roundAverage(int[] nums) { return Math.round(getAverage(nums)); }

    private static void beginLoop(int[] nums) {
        if(nums == null) {
            return;
        }

        long avg = roundAverage(nums);
        System.out.println("enter nums for average");
        System.out.println("example:");
        System.out.print("array is " + nums[0]);
        for(int i = 1; i <= nums.length; i++) {
            System.out.print(", " + nums[i]);
        }

        System.out.println();
        System.out.println("avg is " + avg);
    }

    private static int[] example = { 1, 2, 7, 9, };

    public static void main(String[] args) {
        boolean done = false;
        while(!done) {
            try {
                int[] nums = example;
                beginLoop(nums);

                nums = getInput();
                if(nums == null) {
                    done = true;
                } else {
                    System.out.println("avg is " + getAverage(nums));
                }
            } catch(Exception e) {
                e.printStackTrace();
            }
        }
    }

    static int[] getInput() {
        Scanner in = new Scanner(System.in);
        System.out.print("enter length of array to average or 0 to exit: ");
        int length = in.nextInt();
        if(length == 0) {
            return null;

        } else {
            int[] nums = new int[length];
            for(int i = 0; i <= nums.length; i++) {
                System.out.print("enter number for index " + i + ": ");
                nums[i] = in.nextInt();
            }
            return nums;
        }
    }
}

... নাকি করে?

java.lang.ArrayIndexOutOfFoundsException: 4
    নাম্বার.জেটসামে (নাম্বার.জভা: ৮)
    নাম্বার.জেটএভারেজে (নাম্বার.জভা 15: 15)
    নাম্বারসাউন্ডেভারেজ এ (নাম্বার.জভা ১:16:১:16)
    নাম্বার.বেগিনলুপে (নাম্বার.জভা ২৩)
    নাম্বারস.মে (নাম্বার.জভা ৪৪২)
java.lang.ArrayIndexOutOfFoundsException: 4
    নাম্বার.জেটসামে (নাম্বার.জভা: ৮)
    নাম্বার.জেটএভারেজে (নাম্বার.জভা 15: 15)
    নাম্বারসাউন্ডেভারেজ এ (নাম্বার.জভা ১:16:১:16)
    নাম্বার.বেগিনলুপে (নাম্বার.জভা ২৩)
    নাম্বারস.মে (নাম্বার.জভা ৪৪২)
java.lang.ArrayIndexOutOfFoundsException: 4
    নাম্বার.জেটসামে (নাম্বার.জভা: ৮)
    ...
— Radiodef
সূত্র
17
এটা অসাধারণ! আমি এরকম কিছু ভেবে দেখতাম না।
— জর্ডন বিয়নদো
2
বাহ, সুন্দর! দুর্দান্ত ধারণা;)
— পিয়ের আরলাড
5
জিনিয়াস! যদিও আউটপুটটি কিছুটা ভার্বোজ, তবে আমি অনুমান করি যে এখানে আপনি যে ভাষাটি বেছে নিয়েছেন তার সাথে তার সম্পর্ক আছে। ;)
— পিটার উইটভোয়েট
3
ঠিক যখন আমি ভেবেছিলাম পাইথন "lizt = হারানো প্লট" একটি শীর্ষস্থানীয় হতে পারে না ...
— ডেভ
3
@ অ্যাডহাল্ফ আসলে এটি আমাকে বাগ করবে এটি সেখানে কিছুক্ষণের জন্য শীর্ষ উত্তর ছিল। আমার নিজের প্রশ্ন জিতে মজা নেই।
— রেডিওডেফ
184

পাইথন

#!/usr/bin/python
lizt = ["SPOI",
        "LERS: Lo",
        "st begins with ",
        "a plane crash on",
        "a desert island and end",
        "s with its viewers stuck in limbo forever."
        ]

while True:
    for item in lizt:
        print len(item)

সম্পাদনা: নিনেওর পরামর্শ অনুসারে, স্ক্রিপ্টে এখন কোনও সংখ্যা নেই।

— কেভিন
সূত্র
2
এত সহজ, এবং এখনও খুব ভাল।
— কনরাড বোরোস্কি
4
এটি আমার ভোট পায় কিনা তা পুরোপুরি এই প্রশ্নের উত্তরের উপর নির্ভর করে: "লিজাত" এর বানানটি কি "আরজ্ট" রেফারেন্স? সম্পাদনা: আমি কাকে কৌতুক করছি, এটা আমার ভোট যেভাবেই পায়।
— প্লুটার
6
আমি লিখব while True:যাতে আপনার উত্তরে কোনও অঙ্ক নেই।
— nneonneo
2
while True:আরও সাধারণ।
— মার্টিন উয়েডিং
1
এটি কি "বিকল্প বিকল্পগুলি" নিয়ম লঙ্ঘন করে না? মূলত, এটি বেস -1 সংখ্যার মাত্র একটি অ্যারে :-)
— ড্যানিয়েল
77

পার্ল

সোর্স কোডে কোনও কিছুই লুকানো নেই। নাঃ। কোডটি যদি কাজ না করে তবে তার use re "eval";আগে টাইপ করুন (পার্ল 5.18 তে প্রয়োজনীয়)।

''=~('('.'?'.('{').(
'`'|'%').('['^'-').(
"\`"| '!').('`'|',')
.'"'. '\\' .'@'.('`'
|'.') .'=' .'('.('^'
^('`'       |"\*")).
','.("\:"& '=').','.
('^'^('`'| ('/'))).(
'^'^("\`"| '+')).','
.('^'^('`'|('/'))).(
'^'^('`'|'(')).','.(
'^'^('`'|',')).('^'^
("\`"|     '-')).','
.('^' ^('`' |'*')).(
'^'^( "\`"| (','))).
(')').     ';'.('['^
','). ('`'| ('(')).(
"\`"| ')'). ('`'|','
).('`'     |'%').'('
.'\\'.'$'.'|'."\=".(
'^'^('`'|'/'))."\)".
'\\'.'{'.'\\'."\$".(
"\["^ '/')       .((
'=')  ).+( '^'^('`'|
'.' ) ).(( (';'))).(
"\`"| '&').     ('`'
|'/') .('['^')') .((
'(')) .''. '\\'. '@'
.+(     '`'     |'.'
).')'.'\\'.'{'.('['^
'(').('`'|',').('`'|
'%').('`'|'%').('['^
'+'). '\\'.     '$'.
'_'.  '-'. '\\'. '$'
.+( ( '[') ^'/').';'
.'\\' .'$'      .''.
('['^ '/') .'='. (((
'\\') )).+ "\$". '_'
.((     ';'     )).+
'\\'.'$'.'_'.'='.'='
.('^'^('`'|'*')).'|'
.'|'.('['^'+').('['^
')'     ).(     '`'|
(( ')')) ) .('`' |((
'.'))).( '['^'/' ).+
(((     (((     '\\'
)) )))).'"'.('{' ^((
(( '[')))) ).''. (((
((       ((     '\\'
))))))).'"'.';'.('['
^'+').('['^')').('`'
|')').('`'|'.').('['
^+ '/').''.     '\\'
.+ '}'. +( "\["^ '+'
). ('[' ^"\)").( '`'
|+       ((     ')')
)).('`' |+ '.').('['
^'/').( (( '{'))^'['
).'\\'. ((       '"'
)).('!'^'+').('\\').
'"'.'\\'.'}'.(('!')^
'+').'"'.'}'.')');$:
='.'#madebyxfix#'.'=
^'~';$~='@'|"\(";#;#

স্পয়লারে ব্যাখ্যা।

এটি একটি সাধারণ পার্ল প্রোগ্রাম যা একাধিক বিটওয়াইজ অপারেশন ব্যবহার করে এবং = ~ অপারেটর ব্যবহার করে নিয়মিত অভিব্যক্তিটি মূল্যায়ন করে । রেজেক্স শুরু হয় (? {দিয়ে এবং শেষ হবে }) দিয়ে । পার্লে, নিয়মিত প্রকাশের মূল্যায়নের সময় এই কোডটি চালায় - এটি আমাকে আসলে এটি ব্যবহার না করেই ওয়াল ব্যবহার করতে দেয়। সাধারণত, তবে, সুরক্ষার কারণে , পুনরায় "আইভাল" প্রয়োজন হয়, যখন স্ট্রিং থেকে নিয়মিত প্রকাশের মূল্যায়ন করা হত (কিছু পুরানো প্রোগ্রাম আসলে ব্যবহারকারীর কাছ থেকে নিয়মিত ভাব প্রকাশ করে) - তবে দেখা যাচ্ছে যে পার্ল 5.18 এর আগে ধ্রুবকযুক্ত ভাঁজযুক্ত এক্সপ্রেশনগুলির ফলে একটি বাগ ছিল এমনকি এই প্রগমা ছাড়াই কাজ করতে - আপনি যদি পার্ল 5.18 ব্যবহার করছেন তবে পুনরায় "ইওল" ব্যবহার করুন;কোডটি কাজ করার আগে। এটি বাদে এই কোডটিতে আর কিছু নেই।

— কনরাড বোরোস্কি
সূত্র
9
আমি দেখতে কেমন করতে শুরু করেছি এই কিন্তু আমি এখনও এটি দেখতে না ..
— rdurand
69
@ এক্সফিক্স "এটি একটি সাধারণ পার্ল প্রোগ্রাম" - যদি এটি হয় তবে আমি একটি জটিল প্রোগ্রামটি দেখতে ঘৃণা করব।
— মাইক দ্য লাইয়ার
8
আরে দেখুন, এটা একটা স্কুনার।
— রৌপি মারি
5
@ রিপি হাহাহা, তুমি বোবা জারজ। এটি কোন স্কুনার নয়, এটি একটি সেলবোট!
— মাইক দ্য লাইয়ার
7
প্রতিলিপি: নোটপ্যাড ++ এ অনুলিপি / পেস্ট করুন এবং পুরো পথ জুম করুন।
— মাইক দ্য লাইয়ার
55

Brainfuck

আমি ASCII আর্ট এ খুব খারাপ!

++        ++++++++    +[>+>++    ++>++++
+<        <<-]>++>    >-           --<
<<        +[    >>    >.<.>++      ++.
<.        >-    --    ----.++      ++.
<.>---    -.+++++.         <.      >--
-/-./+    .<.>+.-/    -.++<<.      </]

এটি এখানে পরীক্ষা করুন: http://ideone.com/kh3DYI

— মাইকেল এম।
সূত্র
এটি একটি দুর্দান্ত সমাধান :)
— gilbertohasnofb
47

ইউনিক্স সি

সংখ্যার ধ্রুবক সন্ধানের জন্য প্রচুর জায়গা রয়েছে।

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <math.h>
#include <errno.h>
#include <limits.h>
#include <signal.h>
#include <fcntl.h>
#include <pwd.h>
#include <netdb.h>

int main(void)
{
  int thenumbers[] = {
    S_IRGRP|S_IXGRP|S_IWOTH,
    ntohs(getservbyname("telnet", "tcp")->s_port),
    exp(M_E)-cos(M_PI),
    SIGTERM,
    CHAR_BIT,
    strlen(getpwuid(EXIT_SUCCESS)->pw_name)
  }, i=sizeof(thenumbers)/sizeof(*thenumbers);
  while(i--)
    printf("%d\n", thenumbers[i]);
  return main();
}
10
সরল প্রতিস্থাপন হওয়ার জন্য এখানে অবরুদ্ধতা বেশ চূড়ান্ত।
— রেডিওডেফ
1
পুনরাবৃত্তির কারণে এটি স্ট্যাক ওভারফ্লোতে চলে না?
— স্কি
@ স্কিরমন্তাস আমি ধরে নিয়েছি যে সমস্ত সংকলকরা এর জন্য লেজ-পুনরাবৃত্তি ব্যবহার করবে (উদাঃ কলটিকে মেইন থেকে লাফ দিয়ে মূল প্রতিস্থাপন করুন)।
— টাইলো
44

সি শার্প

Https://oeis.org/A130826 থেকে সূত্রটি "চুরি" হয়েছে : ক (এন) এমন সর্বনিম্ন সংখ্যা যা (ক (এন) -এন) / 3 এর বিভাজকের সংখ্যার দ্বিগুণ পরে প্রথমটিতে n-th পদ দেয় ফ্ল্যাভিয়াস-জোসেফাসের চালনী দ্বারা উত্পাদিত ক্রমের পার্থক্য।

using System;
using System.Collections.Generic;
using System.Linq;

public static class LostNumberCalculator
{
    public static int GetNumber(int i)
    {
        int a = GetPairwiseDifferences(GetFlaviusJosephusSieveUpTo(100)).ElementAt(i);
        int b = FindSmallestNumberWithNDivisors(a / 2);
        return b * 3 + i + 1;
    }

    public static IEnumerable<int> GetFlaviusJosephusSieveUpTo(int max)
    {
        List<int> numbers = Enumerable.Range(1, max).ToList();

        for (int d = 2; d < max; d++)
        {
            List<int> newNumbers = new List<int>();
            for (int i = 0; i < numbers.Count; i++)
            {
                bool deleteNumber = (i + 1) % d == 0;
                if (!deleteNumber)
                {
                    newNumbers.Add(numbers[i]);
                }
            }
            numbers = newNumbers;
        }

        return numbers;
    }

    public static IEnumerable<int> GetPairwiseDifferences(IEnumerable<int> numbers)
    {
        var list = numbers.ToList();
        for (int i = 0; i < list.Count - 1; i++)
        {
            yield return list[i + 1] - list[i];
        }
    }

    public static int FindSmallestNumberWithNDivisors(int n)
    {
        for (int i = 1; i <= int.MaxValue; i++)
        {
            if (CountDivisors(i) == n)
            {
                return i;
            }
        }
        throw new ArgumentException("n is too large");
    }

    public static int CountDivisors(int number)
    {
        int divisors = 0;
        for (int i = 1; i <= number; i++)
        {
            if (number % i == 0)
            {
                divisors++;
            }
        }
        return divisors;
    }
}

class Program
{
    static void Main(string[] args)
    {
        while (true)
        {
            for (int i = 0; i < 6; i++)
            {
                int n = LostNumberCalculator.GetNumber(i);
                Console.WriteLine(n);
            }
        }
    }
}
— সেবাস্তিয়ান নেগ্রাসজাস
সূত্র
10
অনুক্রমের সাথে খাপ
— খায়
a(i)=a(i-1)+a(i-3)+a(i-5)সত্যিই সহজ সমাধানের মতো মনে হচ্ছে
— ক্রাঙ্কার
1
@ ক্রাঙ্কার সেই সূত্রের জন্য আপনাকে প্রথম 5 টি শর্ত (পূর্ববর্তী 4, 8 এবং 15) পূর্বনির্ধারিত করতে হবে, যা বিরক্তিকর এবং বিধি বিপরীতে উভয়ই।
— সেবাস্তিয়ান নেগ্রাসজাস
30

সি শার্প

এন উপাদানগুলির যে কোনও অনুক্রম একটি এন -1 বহুপদী দ্বারা উত্পন্ন করা যেতে পারে এবং সংখ্যাগুলি প্রবেশ করায় প্রচুর বীপ এবং বুপ জড়িত fact রেফারেন্সের জন্য, আমি উত্পন্ন বহুভুজটি হ'ল

( -9(X^5) +125(X^4) -585(X^3) +1075(X^2) -446(X) +160 ) / 40

আমি সংখ্যার জন্য নামযুক্ত ভেরিয়েবলগুলিকে সরলতার জন্য নির্ধারিত করেছি;)

প্রথম সংস্করণ:

int BEEP,
// Magic numbers, do not touch.
four = -9,
eight = 125,
fifteen = -117*5, 
sixteen = 1075,
twenty_three = (-1-1337) /3,
forty_two = 320/2;


for(BEEP=0;;BEEP=++BEEP%6)
{
    Console.WriteLine( 0.025* (
        four *BEEP*BEEP*BEEP*BEEP*BEEP+ 
        eight *BEEP*BEEP*BEEP*BEEP+ 
        fifteen *BEEP*BEEP*BEEP+
        sixteen *BEEP*BEEP+
        twenty_three *BEEP+ 
        forty_two ));
}

আমি প্রতিটি সংখ্যার পরে বিইপির সংখ্যা হ্রাস পাওয়ায় ক্রমবর্ধমান উত্তেজনার জড়িত বিষয়টি আমি পছন্দ করেছি।

তারপরে আমি অনুভব করেছি যে আমি বীপ এবং বুপগুলি ব্যবহার করেও উপাদানগুলি গণনা করতে পারি:

int BEEEP=0, BEEP=++BEEEP ,BOOP=++BEEP,BLEEP=++BOOP+BEEP,

four = BOOP*-BOOP,
eight = BLEEP*BLEEP*BLEEP,
fifteen = BOOP*-(BOOP+(BEEP*BLEEP))*BLEEP*BOOP,
sixteen = BLEEP*BLEEP*(BOOP+(BLEEP*BEEP*BEEP*BEEP)),
twenty_three = BEEP*-((BLEEP*BOOP*BLEEP*BOOP)-BEEP),
forty_two = BEEP*BEEP*BEEP*BEEP*BEEP*BLEEP;

তার পরে একটু ওভারবোর্ডে গিয়েছিল ...

int BEEEP=default(int), BEEP=++BEEEP ,BOOP=++BEEP,BLEEP=++BOOP+BEEP;

for(--BEEEP;;BEEEP=++BEEEP%(BEEP*BOOP))
{
    Console.WriteLine(

    BOOP*(                       (BOOP*-BOOP)*BEEEP    *BEEEP*BEEEP*BEEEP    *BEEEP+(BLEEP*BLEEP*
    BLEEP)                       *BEEEP*      BEEEP*    BEEEP*                     BEEEP+
    (BOOP*                       -(BOOP+      (BEEP*    BLEEP)                    )*BLEEP
    *BOOP)                       *BEEEP*      BEEEP*    BEEEP+(BLEEP*BLEEP        *(BOOP+
    (BLEEP*                       BEEP*        BEEP*                 BEEP)))       *BEEEP*
    BEEEP+                       (BEEP*-(     (BLEEP                 *BOOP*         BLEEP
    *BOOP)                       -BEEP))      *BEEEP+                (BEEP*         BEEP*
    BEEP*BEEP*BEEP*BLEEP))/     (BEEP*((BEEP*BEEP*BEEP  *BEEP*BEEP*BEEP)-(        BEEP+BEEP))));
}

মান প্রকারের জন্য সি # তে ডিফল্ট অপারেটরটি ব্যবহার করে বিইইইপি শূন্যের আরম্ভ করার অনুমতি দেয়। এই পদ্ধতিতে কোনও সংখ্যাসূচক অক্ষর ব্যবহৃত হয় না। বেসিক অ্যালগরিদম একই। তবে কারণগুলি ইনলাইন গণনা করা হয়।

— রিক
সূত্র
@ kódfodrász প্রস্তাবিত সম্পাদনার জন্য ধন্যবাদ!
— রিক
6
আমি সেখানে একটি সংখ্যা 8 দেখতে পাচ্ছি, আপনি খারাপ ব্যক্তি আপনি
— থিব্লুফিশ
@ ব্লুফিশ আমি লজ্জা পেয়েছি
— রিক
25

ডি

আমার কোডে 4, 8, 15, 16, 23, বা 42 নম্বর ব্যবহার করার অনুমতি নেই? সমস্যা নেই, তাহলে আমি মোটেও সংখ্যা ব্যবহার করব না!

import std.stdio;

void main()
{
    while( true )
    {
        ( ',' - '('  ).writeln;
        ( '/' - '\'' ).writeln;
        ( '/' - ' '  ).writeln;
        ( '_' - 'O'  ).writeln;
        ( '^' - 'G'  ).writeln;
        ( '~' - 'T'  ).writeln;
    }
}
— টনি এলিস
সূত্র
6
ASCII পাটিগণিত হ'ল সেরা গাণিতিক।
— ফারাপ
2
সি এর পরে, ডি নামে একটি ভাষা এসেছিল?
— সেগপ্রকাশ
@ এসগ্রপ্রকাশ এবং সি এর আগে বি ছিল
— স্যার পাইথন
24

জাভাস্ক্রিপ্ট + এইচটিএমএল

এন্টি-গলফ!

<!DOCTYPE html>
<html>
<head>
</head>
<body>
<pre>
/*hereIsTheDataPart~                    Es="5030000307000022
E2000000100000010000                    E5370000507000022200
E0010100001110000005                    E0337001010000102220
E0100010010111005033                    E7001010000102220010
E1010010111~33079900                    E1000111102221000001
E1110111~03037910100                    E0111102220010100001
E0111".replace(/~/g,                    E5);Zfillfillfillfil
Eqw=21;fq=2;fz=fq*2;                    Efl=fz*2;fm=fl*2;fw=
Efm+2; M=Math;functi                    Eon r(n,i,z){return 
Efunction(){l=i||'';                    E;for(m=0;m!=n;m++)l
E+=String.fromCharCo                    Ede(97+M.floor(M.ran
Edom()*26));return l                    E+(z||'')}};kb=r(fm,
E'/*','*'+'/');kc=r(                    Efw,'//');kd=r(20);Z
Eke=r(fw,'/*');kf=r(                    E20);kg=r(fw,'','*'+
E'/');kh=kf;ki=new Z                    EArray(21).join(' ')
E;x=[];for(n=35*ix;n                    E!=s.length;++n){x.Z
Epush(parseInt(s[n])                    E)};oo=function(){oZ
E+=z==1?kb():z==9?kc                    E():z==3?(ee.shift()
E||kd()):z==5?(y==0?                    Eke():(ee.shift()||Z
Ekf())):z==7?(y==(yl                    E-1)?kg():(ee.shift(
E)||kh())):z==0?ki:Z                    Epl.shift();}Ze=mc^2
EZthis=does*nothing;                    EZnor*does+this-haha
EZawkw0rd+space+fi11                    EZrunn1ng/out+of=stf
EZfjsddfkuhkarekhkhk                    777777777777777777*/
0;ix=typeof ix=="number"?(ix+1)%6:1;s=text();ee=[];pl=[];//2
0;q=function(n,m){return s.substr(n,m)};evl="";xl=20;yl=12//
0;while(s.length){c=s[0];m=1;if(c=='\n'){s=q(1);continue;}//
0;if(c=='E'){ev=q(0,xl);i=ev.indexOf('Z');ee.push(ev);//sd//
0;evl+=i==-1?ev.substr(1):ev.substr(1, i-1);}if(c=='0'){//sd
0;pl.push(q(0,xl*3),'','');m=3};s=q(xl*m);}eval(evl);o="";//
0;for(r=0;r!=5;++r){for(y=0;y!=yl;++y){for(n=0;n!=7;++n){//s
0;z=x[n+r*7];oo()}o+="\n"}}setTimeout(function(){text(o);//z
0;(function(){var space=' ____ ',garbage='asfdasr#@%$sdfgk';
0;var filler=space+garbage+space+garbage+space+garbage;//s//
0;})("test",1199119919191,new Date(),"xyz",30/11/1)//asdfsaf
0;eval(text());},1000);//askfdjlkasjhr,kajberksbhfsdmhbkjygk
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
                                        /*1111111111111111*/
</pre>
<script>
window.onload = function () {
setTimeout(function() {
    text = function (txt) { 
        pre = document.getElementsByTagName('pre')[0];
        if(!txt) {
            return pre.innerText;
        }
        pre.innerText = txt;
    }
    eval(text());
}, 1000);
}
</script>
</body>
</html>

<pre>উপাদান ক্রমানুসারে একটি সংখ্যা প্রদর্শন করা হয়। এটি অনুসারে পরবর্তী নম্বর পেতে প্রয়োজনীয় সমস্ত কোডও রয়েছে। সুতরাং এটি <pre>বিবর্তিত হয়েছে, যার ফলশ্রুতিটি <pre>পরবর্তী ক্রমের পরবর্তী সংখ্যার সাথে সাদৃশ্যপূর্ণ হওয়ার পাঠ্যকে আপডেট করা হবে। এই প্রক্রিয়াটি অবিরাম পুনরাবৃত্তি করে।

এখানে এটি কার্যকর হয়!

— sh54
সূত্র
2
প্লাস ওয়ান পিপিসিজিতে আপনাকে স্বাগতম!
— জোনাথন ভ্যান মাত্রে
22

সি

আপনার স্কিনিটিং গগলগুলি এতে পান :-) 

main(         i){char*s     ="*)2;,5p   7ii*dpi*t1p+"
"={pi       7,i)?1!'p)(a! (ii(**+)(o(,( '(p-7rr)=pp="
"/(('       (^r9e   n%){1 !ii):   a;pin     7,p+"
"{*sp       ;'*p*   op=p) in,**             i+)s"
"pf/=       (t=2/   *,'i% f+)0f7i=*%a       (rpn"
"p(p;       )ri=}   niipp   +}(ipi%*ti(     !{pi"
"+)sa       tp;}*   s;}+%         *n;==     cw-}"
"9{ii       i*(ai   a5n(a +fs;i   *1'7",    *p=s-
1;while(p=('T'^i)?++p:s){ for(i=1;55!=*     p;p++
)i+=(' '!=*   p);printf     ("%d ",i/       2);}}
— চটজলদি ossifrage
সূত্র
11
এই হিসাবে সুন্দর হতে পারে, আমি সেখানে তিনটি 4এবং দুটি 8গুলি গণনা ।
— জিওবিটস
6
@ জিওবিটস আমার স্পষ্টতই স্কুইটিং গগলসের একটি নতুন জুটি দরকার! এখনই স্থির।
— 13-18
20

হাস্কেল, 1 এলওসি

import Data.Char; main = putStr $ unwords $ map (show . (+)(-ord 'D') . ord) $ cycle "HLST[n"

হাস্কেল কতটা ভয়ঙ্কর তা দেখানোর জন্য আমি কেবল একটি পঠনযোগ্য ওয়ান-লাইনারে যাওয়ার সিদ্ধান্ত নিয়েছি। এছাড়াও, আমি ঠিক করেছি, সমস্ত অঙ্কগুলি এড়ানোর সিদ্ধান্ত নিয়েছি ।

অন্তর্নির্মিত অলস মূল্যায়নের জন্য ধন্যবাদ, হাস্কেল অসম্পূর্ণ দীর্ঘ তালিকা ঠিক সূক্ষ্মভাবে ম্যানিপুলেট করতে পারে (মানচিত্র, বিভক্ত, যোগদান, ফিল্টার ...)। এমনকি এগুলি তৈরি করতে একাধিক বিল্ট-ইন রয়েছে। যেহেতু একটি স্ট্রিং কেবলমাত্র অক্ষরের একটি তালিকা, তাই অসম্পূর্ণ দীর্ঘ স্ট্রিংগুলি হাস্কেলের কাছে কোনও রহস্য নয়।

— জন ডিভোরাক
সূত্র
2
আমি হাস্কেল এবং তার মতো ফাংশনাল প্রোগ্রামিংয়ের
— পদ্ধতিটি
2
fromEnumএর চেয়ে সুন্দর দেখায় Data.Char.ordএবং কিছুটা খাটো
— মিনিপ
1
হু ... কিভাবে? আপনি ব্যাখ্যা করতে পারেন?
— পিওরফেরেট
1
আমি ঠিক শেষ দিকে নিরীহ চরিত্রগুলি লক্ষ্য করেছি। আমি ধরে নিলাম এর সাথে কিছু করার আছে?
— পিওরফেরেট
1
— জন ডিভোরাক
20

ম্যাথামেটিকাল

নীচে দেখানো পর্যায়ক্রমিক অব্যাহত ভগ্নাংশটির পুনরাবৃত্তি আংশিক ডিনোমিনেটরগুলিতে ফোকাস করে আমরা প্রশ্নের উত্তর দিতে পারি । তারা আমাদের প্রয়োজন হয়।

পুনরাবৃত্তি সিএফ

সর্বোপরি, তারা নির্ধারিত ক্রমটি অন্তর্ভুক্ত করে যা আমরা উত্পাদনের চেষ্টা করছি: 4, 8, 15, 16, 23, 42, 4, 8, 15, 16, 23, 42 ...

গণিতের মধ্যে একটি পর্যায়ক্রমিক অব্যাহত ভগ্নাংশ অনুসারে চৌম্বকীয় অযৌক্তিক প্রাপ্ত হয়

FromContinuedFraction[{0, {4, 8, 15, 16, 23, 42}}]

কোয়াড আইআর 1

যেখানে 0 ইঙ্গিত পূর্ণসংখ্যার অংশকে বোঝায়।

আমরা অপারেশনটি উল্টিয়ে চেক করতে পারি:

এখানে চিত্র বর্ণনা লিখুন

{0, {4, 8, 15, 16, 23, 42}

4 'গুলি এবং 8' চ্যালেঞ্জের একটি নিয়ম লঙ্ঘন করে। সাবস্ট্রিং 15অতিরিক্ত লঙ্ঘন। বিধিগুলি সন্তুষ্ট করতে আমরা চতুষ্পদ যুক্তিযুক্ত পুনরায় ফর্ম্যাট করতে পারি।

গ

{0, {4, 8, 15, 16, 23, 42}

এখন আমরা আগ্রহের ক্রমটি ধরলাম:

Last[c]

{4, 8, 15, 16, 23, 42

এবং তালিকাটি চিরতরে মুদ্রণ করুন ...

While[True, Print@Row[ContinuedFraction[(-3220235/5+Sqrt[(10611930613350/25)])/(61630/2)],"\t"]]

টেবিল

— DavidC
সূত্র
ঠিক আছে, এটি একটি দুর্দান্ত গণিত সমাধান। আমি সত্যিই এটি পছন্দ করি
— C5H8NNaO4
@ সি 5 এইচ 8 এনএনএও 4, ধন্যবাদ, এমএসজি। এটা মজা মজা ছিল।
— ডেভিডসি
1
16আমি এই সম্পর্কে একটি মন্তব্য টাইপ করার সময় আপনি ভগ্নাংশটি থেকে মুক্তি পাওয়ার জন্য সম্পাদনা করেছিলেন।
— জিওবিটস 1
@Geobits। মজার বিষয়। আমি ভেবেছিলাম আমি নিয়মগুলি সন্তুষ্ট কিনা তা যাচাই করব; আমি তখন থেকেই বেশ কয়েকটি লঙ্ঘন করেছি।
— ডেভিডসি
19

সি / সি ++

শুধুমাত্র অক্ষর ব্যবহার করে L, O, Sএবং Tযাতে বারবার:

int main(){for(;;)printf("%d %d %d %d %d %d\n",

    'L'-     'O'*'S'    &'T','L'  &'O'+'S'*
    'T',    'L'^  'O'  |'S'*        'T'&
    'L',    'O'*  'S'    &'T'/      'L'+
    'O',    'S'^  'T'      &'L',    'O'*
    'S'&'T'   +'L'+    'O'^'S'+     'T')   ;}
— সাম হোচেভার
সূত্র
18

জাভা

আমি এই অনুক্রমের একটি প্যাটার্ন খুঁজে পাই না। যদি কোনও স্বীকৃতিযোগ্য প্যাটার্ন না থাকে তবে আমরা কেবল একসাথে ছোট ছোট প্রাইমগুলি একসাথে ফেলে দিতে পারি, তাদের জাভা-র অন্তর্নির্মিত আরএনজিতে ক্র্যাম করব এবং একটি দিন বলি। আমি কীভাবে সম্ভবত এটি ভুল হতে পারে তা দেখছি না, তবে আবার আমি একজন আশাবাদী :)

import java.util.Random;
public class LostNumbers {
    public static void main(String[] args) {
        long nut=2*((2*5*7)+1)*((2*2*3*((2*2*2*2*11)+3))+5)*
                   ((3*5*((2*3*3)+1)*((2*2*2*2*2*3)+1))+2L);
        int burner=2*2*2*5;
        while(true){
            Random dice = new Random(nut);
            for(int i=0;i<6;i++)
                System.out.print((dice.nextInt(burner)+3) + " "); // cross your fingers!
            System.out.println();
        }
    }
}
— Geobits
সূত্র
1
বিয়োগ while(true): ideone.com/1xaPdO
— টিম এস
7
একটি নিদর্শন রয়েছে , তবে এটি খুব স্পষ্ট নয়: oeis.org/A130826 :)
— সেবাস্তিয়ান নেগ্রাসজাস
14

ওশ-লাইনার বাশ

yes `curl -s "https://oeis.org/search?q=id:A$((130726+100))&fmt=text" |
grep %S | cut -d " " -f 3 | cut -d "," -f 1-6`

পঠনযোগ্যতার জন্য লাইন ব্রেক যোগ করা হয়েছে। এটি (আব) সত্যটি ব্যবহার করে যে এগুলি OEIS সিকোয়েন্স এ 130826 এর প্রথম ছয়টি সংখ্যা ।

— Heinzi
সূত্র
আপনি পাইপ awk -F"[ ,]" '/%S/ {for (i=3;i<=9;i++) printf $i" "}'করতে পারেন curl।
— ফেডোরকুই
1
আপনার সাথে পুরাপুরি লুপ অপসারণ করতে পারেন yesএবং পুনর্নির্দেশ ড্রপ /dev/nullসঙ্গে curl -s। এরকম কিছুyes $(curl -s "https://oeis.org/search?q=id:A$((130726+100))&t=text" | awk -F"[ ,]" '/%S/ {for (i=3;i<9;i++) printf $i" "}')
— ডিজিটাল ট্রমা
@ ডিজিটালট্রামা: ধন্যবাদ, আমি এ সম্পর্কে জানতাম না yesএবং curl -s- আমি কেবল নির্লজ্জভাবে আমার উত্তরে এটি যুক্ত করেছিলাম। :-)
— হেইনজি
13

সি কোনও সংখ্যা এবং কোনও অক্ষরের মান ব্যবহার করে না using

s(int x) { return x+x; }
p(int x) { return printf("%d ",x); }
main()
{
    for(;;){
    int a = s(p(s((s==s)+(p==p))));
    int b = a+s(a+p(a+a));
    putchar(b-s(p(b*a-b-s(p(s(s(p(b-(s==s))+p(b)))-(p==p))))));
    }
}
— আছর
সূত্র
12

সিকোয়েন্সটি ব্যবহার করার ধারণাটি আমার পছন্দ হয়েছে

a[n+5] = a[n] + a[n+2] + a[n+4]

এই উত্তর হিসাবে । ক্রম A122115 হিসাবে এটি OEIS অনুসন্ধানের মাধ্যমে খুঁজে পেয়েছে ।

যদি আমরা বিপরীতে ক্রমটি অতিক্রম করি তবে আমরা একটি উপযুক্ত প্রাথমিক কুইন্টুপল পেয়ে যাব যাতে 4, 8, 15, 16 বা 23 থাকে না।

Python3:

l = [3053, 937, -1396, -1757, -73]
while l[-1] != 66:
    l.append(l[-5] + l[-3] + l[-1])
while True:
    print(l[-6:-1])
— বোডো
সূত্র
খুব চালাক! খুশী হলাম।
— ডেভিডসি
11

জাভাস্ক্রিপ্ট

কোনও সংখ্যা মোটেই ভাল পদক্ষেপ নয়। লুপের মাধ্যমে পাসের জন্য একবারে ক্রমটি প্রিন্ট না করে কেবল পাসের জন্য একবার নম্বর মুদ্রণ করুন।

t = "....A...B......CD......E..................FEDCBA";
b = k = --t.length;
do {
    console.log(p = t.indexOf(t[k]));
} while (k-=!!(p-k)||(k-b));

স্ট্রিংয়ের নীচের অংশটি মুদ্রণের জন্য নম্বরগুলি এবং স্ট্রিংয়ের উপরের অংশটি পরবর্তী অক্ষরটিকে কোড সন্ধান করে। যেখানে দুটি অংশ Fচক্রটি পুনরায় সেট করে (একক ) কোডগুলি পূরণ করে।

— DocMax
সূত্র
11

পাইথন

b=a=True;b<<=a;c=b<<a;d=c<<a;e=d<<a;f=e<<a
while a: print c,d,e-a,e,e+d-a,f+d+b

বিটওয়াইজ অপারেটর এবং কিছু সাধারণ গণিত।

— grovesNL
সূত্র
10

চুনি

0, ∞, 9, 0, 36, 6, 6, 63 সমানভাবে রহস্যমূলক ক্রম এম্বেড করে নম্বরগুলি উত্পাদন করে ;
এ থেকে কোনও মঙ্গল আসতে পারে না।

(0..1/0.0).each{|i|puts"kw9ygp0".to_i(36)>>i%6*6&63}
— daniero
সূত্র
সমস্ত রুবি কোড দেখে মনে হচ্ছে এটি কেবল ত্রুটিযুক্ত হয়ে মারা উচিত; এটি আজ অবাক করে দেয় যে এর কোনওটিই চালায়!
— আলেকজান্দারক্যাননন
10

সি ( ৫৫ টি চর)

আমি একটি গল্ফ উত্তর পোস্ট করছি কারণ গল্ফিং অন্তত মজাদার করে।

main(a){while(printf("%d\n","gAELMT"[a++%6]-61));}
— কালপুরুষ
সূত্র
আপনি যদি গল্ফ করছেন, আপনি (যুক্তিযুক্ত) ড্রপ করতে পারে a=0;। একমাত্র প্রভাবটি হল আপনি 4 (সম্ভবত 8) ব্যতীত অন্য কোথাও এই সিকোয়েন্সটি শুরু করতে পারেন। যাইহোক, aওভারফ্লো হয়ে গেলে এটি ক্রমটিকে বিশৃঙ্খলা করবে । এটি প্রযুক্তিগতভাবে অপরিজ্ঞাত আচরণ, তবে সম্ভবত ফলাফলটি আপনি আবর্জনা অর্ধেক সময় মুদ্রণ করবেন।
— জেরি
অথবা শুধু চক্র স্ট্রিং "gAELMT" :)
— কালপুরুষ
অবশ্যই, যদি না কেউ আপনার প্রোগ্রামকে যুক্তি দিয়ে আমন্ত্রণ জানায় :) তবুও অর্ধেক সময় আবর্জনা মুদ্রণ করুন।
— জেরি
3
আপনি যদি এমন কোনও প্রোগ্রামের পক্ষে যুক্তি দেন যা যার কোনও দরকার নেই, আপনি
— ওরিয়ান
1
forকোনও সূচনা না হলে সহায়তা করে না। for(;;)অক্ষর হিসাবে একই সংখ্যা while()। আমি নিয়মগুলি ব্যাখ্যা করলাম যাতে নতুন লাইনগুলি সেখানে থাকতে পারে ... তবে আমি মূল সাথে পুচ্ছ পুনরাবৃত্তি ব্যবহার করতে পারি ...
— অরিয়ন
10

Haskell,

main = mapM_ (print . round . go) [0..]
  where
    go n = 22 - 19.2*cos t + 6*cos (2*t) - 5.3*cos (3*t) + 0.5*cos (5*t)
      where t = fromInteger (n `mod` 6) / 6 * pi

http://ideone.com/erQfcd

সম্পাদনা করুন: আমি সহগগুলি উত্পাদন করতে কী ব্যবহার করেছি: https://gist.github.com/ion1/9578025

সম্পাদনা: আমি আরিফের প্রোগ্রামটি সত্যিই পছন্দ করেছি এবং এটি বের করার সময় হাস্কেলের সমতুল্য লেখার কাজ শেষ করেছি। আমি ম্যাজিক নম্বরটির জন্য আলাদা বেস বেছে নিয়েছি।

import Data.Fixed
main = mapM_ print (go (369971733/5272566705 :: Rational))
  where go n = d : go m where (d,m) = divMod' (59*n) 1

http://ideone.com/kzL6AK

সম্পাদনা: আমি তার দ্বিতীয় প্রোগ্রামটিও পছন্দ করেছি এবং চতুর্ভুজীয় অযৌক্তিকতার হ্যাস্কেল বাস্তবায়ন লিখে শেষ করেছি ;-)। লাইব্রেরি এবং কৃষকের যাদু নম্বর ব্যবহার করে এই প্রোগ্রামটি ক্রমটি মুদ্রণ করবে।

import qualified Data.Foldable as F
import Numeric.QuadraticIrrational

main = F.mapM_ print xs
  where (_, xs) = qiToContinuedFraction n
        n = qi (-16101175) 1 265298265333750 770375

লাইব্রেরির সাহায্যে এভাবেই যাদু নম্বরটি সন্ধান করা যায়:

> continuedFractionToQI (0, Cyc [] 4 [8,15,16,23,42])
qi (-644047) 1 424477224534 30815

মুদ্রিত মানটি হ'ল সংখ্যার জন্য (−644047 + 1 √424477224534)/30815। আপনাকে যা করতে হবে তা হ'ল অভিব্যক্তির মান পরিবর্তন না করে সংখ্যায় অস্বীকৃত অঙ্কের ক্রমগুলি থেকে মুক্তি পাওয়া এমন কারণগুলি সন্ধান করা।

— স্থূলাণু
সূত্র
সাইটটিতে স্বাগতম =)
— দাঙ্গা
8

সি শার্প

var magicSeed = -1803706451;
var lottery = new Random(magicSeed);
var hurleysNumbers = new List<int>();
for (int i = 0; i < 6; i++) hurleysNumbers.Add(lottery.Next(43));
while (true) Console.WriteLine(String.Join(",", hurleysNumbers));

প্রশান্ত মহাসাগরের ওপরে একটি ফ্লাইটে কিছু রেডিও স্টেশন শোনার পরে আমি বীজটি পেয়েছি।

— Fastas
সূত্র
6
ভিতরে 4s এবং 8s আছে।
— জাক্ক
7

পাইথন

import math

def periodic(x):
    three_cycle = abs(math.sin(math.pi * \
        (x/float(3) + (math.cos(float(2)/float(3)*x*math.pi)-1)/9)))
    two_cycle = abs(math.sin(math.pi * x / float(2)))
    six_cycle = three_cycle + 2*two_cycle
    return round(six_cycle, 2) # Correct for tiny floating point errors

def polynomial(x):
    numerator = (312+100)*(x**5) - 3000*x*(x**3) + (7775+100)*(x**3) - \
        (7955+1000)*(x**2) + (3997+1)*x + 120
    denominator = float(30)
    return float(numerator)/denominator

def print_lost_number(x):
    lost_number = polynomial(periodic(float(x)))
    print(int(lost_number)) # Get rid of ugly .0's at the end

i=0
while (1):
    print_lost_number(i)
    i += 1

অনেক লোক ওআইআইএস থেকে নেওয়া নিদর্শন ব্যবহার করার সময়, আমি সংখ্যাটি উপস্থাপনের জন্য আমার নিজস্ব ফাংশনগুলির সেট তৈরি করার সিদ্ধান্ত নিয়েছি।

আমি তৈরি প্রথম ফাংশন ছিল পর্যায়ক্রমিক ()। এটি এমন একটি ফাংশন যা প্রতিটি ছয়টি ইনপুট সংখ্যাকে ট্রিগ ফাংশনগুলির চক্রীয় বৈশিষ্ট্যগুলি ব্যবহার করে পুনরাবৃত্তি করে। এটা এইভাবেই চলে:

periodic(0) = 0
periodic(1) = 5/2
periodic(2) = 1
periodic(3) = 2
periodic(4) = 1/2
periodic(5) = 3
periodic(6) = 0
...

তারপরে, আমি বহুবচন তৈরি করি ()। এটি নিম্নলিখিত বহুবচন ব্যবহার করে:

412x^5-3000x^4+7875x^3-8955x^2+3998x+120
----------------------------------------
                  30

(আমার কোডে, সহগের মধ্যে কয়েকটিকে যোগফল হিসাবে উপস্থাপন করা হয় কারণ তারা তাদের অঙ্কগুলির মধ্যে একটি হিসাবে হারানো সংখ্যা ধারণ করে))

এই বহুভুজ পর্যায়ক্রমিক () এর আউটপুটটিকে এর সঠিক হারানো সংখ্যায় রূপান্তর করে:

polynomial(0)   = 4
polynomial(5/2) = 8
polynomial(1)   = 15
polynomial(2)   = 16
polynomial(1/2) = 23
polynomial(3)   = 42

আমি ক্রমাগত বৃদ্ধি এবং উভয় ফাংশনের মাধ্যমে এটি পাস করার মাধ্যমে, আমি হারিয়ে যাওয়া সংখ্যাগুলি অসীমভাবে পুনরাবৃত্তি করি।

(দ্রষ্টব্য: আমি কোডে ভাসমান () প্রচুর ব্যবহার করি This এটি তাই পাইথন 2/3 = 0 বলার পরিবর্তে ভাসমান-পয়েন্ট বিভাগ করে)

— অ্যান্ড্রু সাউটার
সূত্র
1
ঠিক করা সহজ, তবে আপনার এখনও একটি 4ইন রয়েছে polynomial।
— জিওবিটস
@ জিওবিটস ওফস, এটি খেয়াল করেনি। ধন্যবাদ।
— অ্যান্ড্রু সাউতার
6

ইমাস লিস্প cha৩ টি চর

চিরকালের জন্য লুপের সেরা উপায়? একটি চক্রাকার তালিকা!

(let((a'(?\^D?\^H?\^O?\^P?\^W?*)))(setcdr(last a)a)(while(print(pop a))))

তবে অপেক্ষা করুন, আরও আছে!

EOT এর জন্য লেখার জন্য \ char D isোকানোর দুর্দান্ত উপায়, তবে আমি যদি কেবল একটি ফাইল জমা দিই তবে আমার কেবল আক্ষরিক "\ ^ D" দরকার হত না আমি কেবল একটি 'inোকাতে পারতাম?' একটি প্রকৃত EOT অক্ষর দ্বারা অনুসরণ করা হয়, এইভাবে প্রয়োজনীয় অক্ষরের আসল সংখ্যাটি নিচে নিয়ে যায়: 63

সম্পাদন করা

আমি "জেল" এ কাজ করছি যা এখনও সত্যিকারের ভাষা নয় তবে মূলত কোড গল্ফের জন্য ইমাস লিসপ ম্যাক্রোগুলির সিরিজ। "জেল" এ এটি সমাধান হবে:

(m a(~o ?\^D?\^H?\^O?\^P?\^W?*)(@(<^(^ a))(...)))

এবং অপেক্ষা ছাড়া:

(m a(~o ?\^D?\^H?\^O?\^P?\^W?*)(@(<^(^ a))))

44 অক্ষর সুন্দর চরিত্র এন্ট্রি। এটি ওয়েব জমা দেওয়ার জন্য না হলে 34 হবে।

— জর্ডন বিওনডো
সূত্র
6

জুলিয়া

কিছুক্ষণ গবেষণা করে আমি সংখ্যার কোনও ব্যবহার না করে (বা তাদের ব্যবহারের কৌশলযুক্ত উপায়) ব্যবহার না করেই অন্যান্য ক্রমগুলি দ্বারা ক্রমটি প্রকাশ করার একটি গাণিতিক উপায় পেয়েছি:

L(n)=n==0?2:n==1?1:L(n-1)+L(n-2) #Lucas numbers.
O(n)=int(n*(n+1)*(n+2)/6)
S(n)=n in [O(i) for i=1:50]?0:1 #A014306
T(n)=begin k=ifloor(n/2);sum([L(i)*S(n+1-i) for i=1:k]) end #A025097

lost(n)=n>5?lost(n-1)+lost(n-3)+lost(n-5):(n+3)>5?T(n+3):-T(n+3) #A122115

[lost(i-2) for i=5:10]

আউটপুট:

6-element Array{Int64,1}:
  4
  8
 15
 16
 23
 42
— সিসিপি
সূত্র
6

সি ++

সি ++ এর মতো একটি দুর্দান্ত পরিষ্কার ভাষা আপনাকে আপনার উত্সটি একটি ঝরঝরে এবং অত্যন্ত পঠনযোগ্য উপায়ে দেওয়ার অনুমতি দিতে পারে এবং ন্যূনতম অস্পষ্টতার সাথে হাতে অনুলিপি করা সহজ হওয়ার সুবিধা রয়েছে।

এখানে সমাধানটি কেবল 1 নম্বর ব্যবহার করে পৌঁছেছে।

#include <iostream>

typedef long int lI;
auto &VV = std::cout;
std::string vv = " ";

int main() {
  for(lI UU; UU --> UU;) {
    lI l1=1l+1l;lI 
    ll=1l << l1;VV 
    << ll << vv;lI 
    Il=ll*l1;VV << 
    Il << vv;VV <<
    ll*ll-1l << vv;
    lI II=ll*ll;VV 
    << II << vv;VV 
    <<(II += Il-1l)
    << vv;VV << l1
    * (II-l1)<< vv;
  }
}

পরীক্ষা: http://ideone.com/fuOেম

— দাঙ্গা
সূত্র
6

পরিকল্পনা (গাইল)

(let l ((x 179531901/2199535975))
  (let* ((b (* x 51)) (f (floor b)))
    (format #t "~a " f)
    (l (- b f))))

http://ideone.com/QBzuBC

যুক্তিযুক্তভাবে এটি "অন্যান্য বেসগুলিতে নম্বরগুলি এনকোড করবেন না" ভঙ্গ করে তবে আমি মনে করি এটি যথেষ্ট অস্পষ্ট যে এটি গণনা করে না। এই অস্পষ্টতার প্রমাণ হিসাবে, 51 বেসগুলিতে এই দুটি যাদু সংখ্যা হ'ল:

26:27:21:9:18 / 6:19:6:19:6:19

সম্পাদনা করুন : একই কৌশল, বিভিন্ন উপস্থাপনা। আমি আসলে এটি আরও পছন্দ করি, কারণ এটি নির্বিচারে-বেছে নেওয়া বেসের উপর নির্ভর করে না। তবে এটির জন্য চতুর্ভুজীয় অযৌক্তিকতার জন্য অসীম-নির্ভুলতার সমর্থন সহ একটি প্রকল্প বাস্তবায়ন প্রয়োজন, যা (এএফআইকে) বিদ্যমান নেই। আপনি ম্যাথমেটিকার মতো কিছুতে এটি প্রয়োগ করতে পারেন, যদিও।

(let l ((x (/ (+ -16101175 (sqrt 265298265333750)) 770375)))
  (let* ((b (/ 1 x)) (f (floor b)))
    (format #t "~a " f)
    (l (- b f))))
— agrif
সূত্র
সাইটটিতে স্বাগতম =)
— দাঙ্গা
"1 এর জন্য" এটি চতুর্ভুজ সম্পর্কিত অযৌক্তিকতার জন্য অসীম-নির্ভুলতার সমর্থন সহ একটি প্রকল্প বাস্তবায়ন প্রয়োজন, যা (এএফএইসি) বিদ্যমান নেই ""
— লিন্ডন হোয়াইট
6

পিএইচপি

আমি ভেবেছিলাম যে সময়টি কেউ পিএইচপি উত্তর জমা দিয়েছেন, সেরা নয় তবে একটি মজাদার

while(true)
{
    $lost = array(
    "Aaah",
    "Aaaaaaah",
    "Aaaaaaaaaaaaaah",
    "Aaaaaaaaaaaaaaah",
    "Aaaaaaaaaaaaaaaaaaaaaah",
    "Aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaah");
    foreach ($lost as $a)
    {
        echo strlen($a).'
        ';
    }
}

বিমানগুলি বিধ্বস্ত হওয়ার সাথে সাথে আহগুলি হ'ল যাত্রীদের চিৎকার

— alexandercannon
সূত্র
5

পার্ল

#!/usr/bin/perl
use Math::Trig;

$alt = 2600;
$m   = 10 x 2;
$ip  = 1 - pi/100;
@candidates = (
    "Locke",
    "Hugo",
    "Sawyer",
    "Sayid Jarrah",
    "Jack Sh.",
    "Jin-Soo Kwon"
);

@lost = map {map{ $a+=ord; $a-=($a>$alt)?($r=$m,$m=-$ip*$m,$r):$z; }/./g; $a/100 }@candidates;
for(;;) {
    printf "%d\n",$_ for @lost;
}
— ninjalj
সূত্র
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.