Program girişi numarası başlangıç ve aralığının sonuna arasında görünür kaç tamsayılar numarası, aralığının başlangıcını ve aralığının bitişini ve çıkış almalı dahil . Hem programlara hem de işlevlere izin verilir.

Örnek Girdiler

Örneğin:

//Input example 1
3,1,100
//Input example 2
3
1
100
//Input example 3
3 1 100
//Input example 4
a(3, 1, 100);

Yukarıdaki dört giriş örneğinin tümü geçerlidir ve bunların tümü, 3söz konusu sayı 1, aralığın başlangıcı ve aralığın 100sonu olduğu anlamına gelir.

Ve sonra programın gerektiği birçok kez nasıl çıktı 3aralığında görünür 1için 100 kapsayıcı . 3tamsayılar görünür 3, 13, 23, 30, 31, 32, 33, ..., 9319 kez olmak üzere toplam en. Bu yüzden program çıktı 19olarak çıkmalıdır , çünkü ila 3aralığında kaç kez görünür .1100

kurallar

• Hem programlara hem de işlevlere izin verilir.
• Tüm sayılar orada olacak, yani tamsayı olacak değil herhangi biri floatler veya doubles.
• Not: aranan numara her zaman aralıkta olacaktır 0≤x≤127. Bu aralığın dışında olacağı hiçbir durum olmayacaktır 0≤x≤127.
• İlk örnekte olduğu gibi 33, olduğu gibi , sayı iki kez değil , 3sadece bir kez görünecek şekilde sayılır .
• Aralığın başlangıç ​​ve bitiş değerleri arasında -65536ve 65535kapsayıcı olacaktır.
• Aralık başlangıcının değeri asla aralık sonunu aşmayacak veya ona eşit olmayacaktır. start < end
• Ayrıca aralık dahil. Örneğin, giriş 8 8 10olsaydı, aralık olur 8≤x≤10ve dolayısıyla çıkış 1 olur.
• Giriş, örneklerde gösterilen yollardan herhangi biri ile alınabilir. Giriş, istediğiniz şekilde dize veya sayı olarak alınabilir.

Test Durumları

3 1 100
19

3 3 93
19

12,-200,200
24          //This is because 12 appears in -129, -128, ..., -112, -12, 12, 112, 120, 121, 122, ...

123,1,3
0           //This is because all of 123's digits have to appear in the same order

3 33 34
2           //Because 3 appears in 2 numbers: 33 and 34

a(0,-1,1);
1

$ java NotVerbose 127 -12 27
0

Snack Parçacığı

Yanıtınızın göründüğünden emin olmak için, lütfen aşağıdaki Markdown şablonunu kullanarak yanıtınızı bir başlıkla başlatın:

# Language Name, N bytes

Ngönderiminizin büyüklüğü nerede . Puanınızı artırmak varsa, olabilir onları içinden vurarak, başlığa eski hesapları tutmak. Örneğin:

# Ruby, <s>104</s> <s>101</s> 96 bytes

Başlığınıza birden fazla sayı eklemek istiyorsanız (örneğin, puanınız iki dosyanın toplamı olduğu veya yorumlayıcı bayrak cezalarını ayrı olarak listelemek istediğiniz için), gerçek puanın başlıktaki son sayı olduğundan emin olun :

# Perl, 43 + 2 (-p flag) = 45 bytes

Dil adını, daha sonra skor tablosu snippet'inde görünecek bir bağlantı da yapabilirsiniz:

# [><>](http://esolangs.org/wiki/Fish), 121 bytes

/* Configuration */

var QUESTION_ID = 98470; // Obtain this from the url
// It will be like https://XYZ.stackexchange.com/questions/QUESTION_ID/... on any question page
var ANSWER_FILTER = "!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe";
var COMMENT_FILTER = "!)Q2B_A2kjfAiU78X(md6BoYk";
var OVERRIDE_USER = 41805; // This should be the user ID of the challenge author.

/* App */

var answers = [], answers_hash, answer_ids, answer_page = 1, more_answers = true, comment_page;

function answersUrl(index) {
  return "https://api.stackexchange.com/2.2/questions/" +  QUESTION_ID + "/answers?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + ANSWER_FILTER;
}

function commentUrl(index, answers) {
  return "https://api.stackexchange.com/2.2/answers/" + answers.join(';') + "/comments?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + COMMENT_FILTER;
}

function getAnswers() {
  jQuery.ajax({
    url: answersUrl(answer_page++),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      answers.push.apply(answers, data.items);
      answers_hash = [];
      answer_ids = [];
      data.items.forEach(function(a) {
        a.comments = [];
        var id = +a.share_link.match(/\d+/);
        answer_ids.push(id);
        answers_hash[id] = a;
      });
      if (!data.has_more) more_answers = false;
      comment_page = 1;
      getComments();
    }
  });
}

function getComments() {
  jQuery.ajax({
    url: commentUrl(comment_page++, answer_ids),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      data.items.forEach(function(c) {
        if (c.owner.user_id === OVERRIDE_USER)
          answers_hash[c.post_id].comments.push(c);
      });
      if (data.has_more) getComments();
      else if (more_answers) getAnswers();
      else process();
    }
  });  
}

getAnswers();

var SCORE_REG = /<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/;

var OVERRIDE_REG = /^Override\s*header:\s*/i;

function getAuthorName(a) {
  return a.owner.display_name;
}

function process() {
  var valid = [];
  
  answers.forEach(function(a) {
    var body = a.body;
    a.comments.forEach(function(c) {
      if(OVERRIDE_REG.test(c.body))
        body = '<h1>' + c.body.replace(OVERRIDE_REG, '') + '</h1>';
    });
    
    var match = body.match(SCORE_REG);
    if (match)
      valid.push({
        user: getAuthorName(a),
        size: +match[2],
        language: match[1],
        link: a.share_link,
      });
    
  });
  
  valid.sort(function (a, b) {
    var aB = a.size,
        bB = b.size;
    return aB - bB
  });

  var languages = {};
  var place = 1;
  var lastSize = null;
  var lastPlace = 1;
  valid.forEach(function (a) {
    if (a.size != lastSize)
      lastPlace = place;
    lastSize = a.size;
    ++place;
    
    var answer = jQuery("#answer-template").html();
    answer = answer.replace("{{PLACE}}", lastPlace + ".")
                   .replace("{{NAME}}", a.user)
                   .replace("{{LANGUAGE}}", a.language)
                   .replace("{{SIZE}}", a.size)
                   .replace("{{LINK}}", a.link);
    answer = jQuery(answer);
    jQuery("#answers").append(answer);

    var lang = a.language;
    if (/<a/.test(lang)) lang = jQuery(lang).text();
    
    languages[lang] = languages[lang] || {lang: a.language, user: a.user, size: a.size, link: a.link};
  });

  var langs = [];
  for (var lang in languages)
    if (languages.hasOwnProperty(lang))
      langs.push(languages[lang]);

  langs.sort(function (a, b) {
    if (a.lang > b.lang) return 1;
    if (a.lang < b.lang) return -1;
    return 0;
  });

  for (var i = 0; i < langs.length; ++i)
  {
    var language = jQuery("#language-template").html();
    var lang = langs[i];
    language = language.replace("{{LANGUAGE}}", lang.lang)
                       .replace("{{NAME}}", lang.user)
                       .replace("{{SIZE}}", lang.size)
                       .replace("{{LINK}}", lang.link);
    language = jQuery(language);
    jQuery("#languages").append(language);
  }

}

body { text-align: left !important}

#answer-list {
  padding: 10px;
  width: 290px;
  float: left;
}

#language-list {
  padding: 10px;
  width: 290px;
  float: left;
}

table thead {
  font-weight: bold;
}

table td {
  padding: 5px;
}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script>
<link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b">
<div id="answer-list">
  <h2>Leaderboard</h2>
  <table class="answer-list">
    <thead>
      <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr>
    </thead>
    <tbody id="answers">

    </tbody>
  </table>
</div>
<div id="language-list">
  <h2>Winners by Language</h2>
  <table class="language-list">
    <thead>
      <tr><td>Language</td><td>User</td><td>Score</td></tr>
    </thead>
    <tbody id="languages">

    </tbody>
  </table>
</div>
<table style="display: none">
  <tbody id="answer-template">
    <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr>
  </tbody>
</table>
<table style="display: none">
  <tbody id="language-template">
    <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr>
  </tbody>
</table>

05AB1E , 6 bayt

Formdaki girdi: üst sınır , alt sınır , sayı .

Ÿvy³åO

Açıklama:

Ÿ       # Inclusive range, [a, ..., b]
 vy     # For each element...
   ³å   # Check if the third input is a substring of the number
     O  # Sum up the results

CP-1252 kodlamasını kullanır . Çevrimiçi deneyin!

Bash, 20 bayt

bariz cevap

seq $2 $3|grep -c $1

misal

$ bash golf 3 1 100
19

Perl, 20 bayt

Kullanılarak 2 bayt Kaydedilen grep@ ardnew en gibi cevap .

Bayt sayısı 18 bayt kod ve -apbayrak içerir.

$_=grep/@F/,<>..<>

3 numarayı üç ayrı satıra verin:

perl -ape '$_=grep/@F/,<>..<>' <<< "3
1
100"

Python 2, 47 43 Bayt

Python 2'nin reprkısa formunu kullanarak nispeten basittir .

f=lambda n,a,b:a<b and(`n`in`a`)+f(n,-~a,b)

Çıkışı:

f(  3,    1, 100) -> 19
f(  3,    3,  93) -> 19
f( 12, -200, 200) -> 24
f(123,    1,   3) -> 0
f(  3,   33,  34) -> 2
f(  0,   -1,   1) -> 1
f(127,   12,  27) -> 0

JavaScript (ES6), 46 45 bayt

f=(n,s,e)=>s<=e&&!!`${s++}`.match(n)+f(n,s,e)

(Benim en iyi yinelemesiz sürümü 61 bayt idi.) Düzenleme: @ edc65 sayesinde 1 bayt kaydedildi.

Jöle , 7 bayt

rAẇ@€⁵S

TryItOnline!

Giriş: Başlat, Son, Bul

Nasıl?

rAẇ@€⁵S - Main link: Start, End, ToFind
r       - range: [Start, ..., End]
 A      - absolute values
     ⁵  - third input: ToFind
  ẇ@€   - sublist exists in with reversed @rguments for €ach
      S - sum

Bir tamsayının alt liste varlığı denetimi için yinelenebilir bir varsayılan değere dönüştürülmesi, ondalık bir listeye (bir karakter listesi değil) verilir, bu nedenle negatif sayıların önde gelen negatif değeri vardır (örn. -122-> bir alt liste [-1,2,2]bulamaz [1,2]) mutlak değer ilk önce en golfçü çözüm gibi görünüyor.

PowerShell v2 +, 64 62 56 bayt

param($c,$a,$b)$(for(;$a-le$b){1|?{$a++-match$c}}).count

Mazzy sayesinde -6 bayt

Upper_bound upper_bound form numarasının komut satırı bağımsız değişkenleriyle girin . Bir komut dosyası bloğu oluşturmak için forçevrelenmemişse, ayrıştırma hatalarına neden olan noktalı virgüller nedeniyle gösterimde küçük bir aptallık $(...). Temel olarak , regex karşı olan sayıları çıkarmak için (the ) tuşunu kullanarak vurana $akadar yukarı doğru dönüyoruz . Bu, parens içinde kapsüllenir, bunları alırız ve boru hattında kalır ve çıktı örtüktür.$bWhere-Object|?{...}-match$c.count

Bununla birlikte, aralığın 50.000'den fazla öğe olmayacağını garanti edersek, döngüyü atlayabilir ve sadece aralık operatörünü 45 43 bayt.. için doğrudan kullanabiliriz . Ancak, bu meydan okuma özelliklerinde olmadığı için, bu geçerli değildir. Aylak.

param($c,$a,$b)($a..$b|?{$_-match$c}).count

Vim, 46 , 41 bayt

C<C-r>=r<tab><C-r>")<cr><esc>jC0<esc>:g/<C-r>"/norm G<C-v><C-a>
kd{

Girdi şu biçimde:

1, 100
3

Haskell, 65 bayt

import Data.List
(s#e)i=sum[1|x<-[s..e],isInfixOf(show i)$show x]

importPuanı bozar. Kullanım örneği: ((-200)#200)12-> 24.

Java 7 85 bayt

int x(int a,int b,int c){int t=0;for(;b<=c;)if((b+++"").contains(a+""))t++;return t;}

Swift 3, 96 93 bayt

import Cocoa
func c(n:Int,s:Int,e:Int){print((s...e).filter{"\($0)".contains("\(n)")}.count)}

Düzenleme 1:

Steno parametreleri kullanarak 3 bayt kaydedildi

Scala, 50 bayt

(c:String)=>(_:Int)to(_:Int)count(""+_ contains c)

ilk girdiyi alır; şöyle söyle:f("12")(-200,200)

explantion:

(c:String)=>  //define an anonymous function taking a string parameter
  (_:Int)     //create a range from an anonymous int parameter
  to          //to
  (_:Int)     //another anonymous int parameter
  count(      //and count how many...
   ""+_       //elements converted to a string
   contains c //contain c
  )

R, 32 bayt

Oldukça açık:

function(a,b,c)sum(grepl(a,b:c))

C #, 71 bayt

Java cevabımı lambdas sayesinde geç

(t,l,u)=>{int d=0;for(;l<=u;)if((l+++"").Contains(t+""))d++;return d;};

Yakut 44 bayt

m=->(n,s,f){(s..f).count{|x|x.to_s[/#{n}/]}}

Test Durumları:

m.(3,1,100)     #=> 19
m.(3,3,93)      #=> 19
m.(12,-200,200) #=> 24
m.(123,1,3)     #=>  0
m.(3,33,34)     #=>  2
m.(0,-1,1)      #=>  1
m.(127,-12,27)  #=>  0

PHP, 62 bayt

Oldukça basit bir yaklaşım:

<?=count(preg_grep('/'.($a=$argv)[1].'/',range($a[2],$a[3])));

Çevrimiçi deneyin

C, 143 bayt

8 bayt tasarruf etmeye yardımcı olduğu için @Kritixi Lithos'a teşekkürler

Elbette bu daha iyi yapılabilir, ama şimdilik var olan en iyisi. C, dizeleri çok zarif bir şekilde işlemez, bu nedenle doğal olarak birkaç işlem gerektirir.

int C(int N,int l,int h){char b[99],n[99];int t=0,i=1;sprintf(n,"%d",N);for(;i<=h;i++){sprintf(b,"%d",i);if(strstr(b,n))++t;}return t;}

Ungolfed + programı

#include <string.h>
#include <stdlib.h>
#include <stdio.h>

int C(int N,int l,int h)
{
    char b[99], n[99];
    int t=0,i=1;
    sprintf(n,"%d",N);
    for(;i<=h;i++)
    {
        sprintf(b,"%d",i);
        if(strstr(b,n))
            ++t;
    }
    return t;
}

int main()
{
  printf("%d\n", C(3, 1, 100));
}

JavaScript, 46 45 bayt

f=(i,s,e)=>s>e?0:RegExp(i).test(s)+f(i,++s,e)

Başlangıç> bitene kadar tekrar tekrar sayım

Düzenleme: Bir bayt kaydetmek için RegExp testine geçin

PHP, 68 63 bayt

for($a=$argv;$a[2]<=$a[3];)$o+=strstr($a[2]++,$a[1])>'';echo$o;

gibi kullanın:

 php -r "for($a=$argv;$a[2]<=$a[3];)$o+=strstr($a[2]++,$a[1])>'';echo$o;" 3 1 100

edit: Titus sayesinde 5 bayt kaydedildi

Powershell, 48 bayt

Kurallara göre, aralık 50.000'den fazla öğe içerebilir. Dolayısıyla, aralık operatörünü ..doğrudan kullanamayız . Teşekkürler AdmBorkBork .

Basit:

param($c,$a,$b)for(;$a-le$b){$i+=$a++-match$c}$i

Test komut dosyası:

$f = {

param($c,$a,$b)for(;$a-le$b){$i+=$a++-match$c}$i

}

@(
    ,(19, 3,1,100)
    ,(19, 3,3,93)
    ,(24, 12,-200,200)
    ,(0, 123,1,3)
    ,(2, 3,33,34)
    ,(1, 0,-1,1)
    ,(0, 127,-12,27)
    ,(44175, 0,-65536,65535)
) | % {
    $e,$a = $_
    $r = &$f @a
    "$($e-eq$r): $r"
}

Çıktı:

True: 19
True: 19
True: 24
True: 0
True: 2
True: 1
True: 0
True: 44175

Japt , 14 8 bayt

Son giriş değeri olarak bulunacak tamsayıyı alır.

õV èÈsøW

Çevrimiçi deneyin

açıklama

             :Implicit input of integers U=start, V=end & W=number
õV           :Range [U,V]
    È        :Map
     s       :  Convert to string
      øW     :  Contains W?
   è         :Count truthy values

Java, 92 89 71 bayt

Şimdi lambdas ile!

(t,l,u)->{int z=0;for(;l<=u;)if((l+++"").contains(t+""))z++;return z;};

Eski 89 bayt işlevi çözümü:

int d(int t,int l,int u){int a=0,i=l;for(;i<=u;)if((i+++"").contains(t+""))a++;return a;}

Süper artış fonksiyonu için Yaşasın!

GolfSharp (rakip olmayan), 41 bayt

(w,q,e)=>r(q,1+e-q).w(n=>n.T().I(w)).L();

rakip 45 bayt

(w,q,e)=>r(q,1+e-q).w(n=>n.T().I(w.T())).L();

Groovy, 48 bayt

{a,b,c->(a..b).collect{"$it".count("$c")}.sum()}

Raket 91 bayt

(for/sum((i(range s(+ 1 e))))(if(string-contains?(number->string i)(number->string d))1 0))

Ungolfed:

(define(f d s e)
  (for/sum ((i (range s (+ 1 e))))
    (if(string-contains?
        (number->string i)
        (number->string d))
       1 0 )))

Test yapmak:

(f 3 1 100)
(f 3 3 93)
(f 12 -200 200)
(f 123 1 3)
(f 3 33 34)
(f 0 -1 1)

Çıktı:

19
19
24
0
2
1

Aksiyom bayt 90

f(y,a,b)==(c:=0;for x in a..b repeat(if position(y::String,x::String,1)~=0 then c:=c+1);c)

Sonuçlar

(3) -> f(3,1,100)=19,f(3,3,93)=19,f(12,-200,200)=24,f(123,1,3)=0,f(3,33,34)=2
   (3)  [19= 19,19= 19,24= 24,0= 0,2= 2]
                                  Type: Tuple Equation NonNegativeInteger
(4) -> f(0,-1,1)=1, f(127,12,27)=0
   (4)  [1= 1,0= 0]
                                  Type: Tuple Equation NonNegativeInteger

Mathematica, 70 bayt

(w=ToString;t=0;Table[If[StringContainsQ[w@i,w@#1],t++],{i,#2,#3}];t)&

giriş

[12, -200.200]

çıktı

24

Clojure, 65 bayt

#(count(for[i(range %2(inc %3)):when(some(set(str %))(str i))]i))

PHP, 56 Bayt

boru olarak çalıştır Çevrimiçi deneyin

Giriş

$argv = [number_to_find, range_start, range_end];

kod

<?=substr_count(join(range(($a=$argv)[1],$a[2])),$a[0]);

açıklama

#substrcount, counts the aparitions of a subtring in a string
substr_count( 
           join( range(($a=$argv)[1],$a[2])), # String with the range
           $a[0]);                            # The number you are looking for

Perl 6 , 32 bayt

{+grep *.contains($^a),$^b..$^c}

Çevrimiçi deneyin!