Codegolf – Сколько Это Будет Стоить?

Ydroneauard

Данный Н предметы (0 < Н <= 50) с ценами (которые всегда являются целыми числами) П₀ ... П_Н-1 и заданное количество каждого предмета А₀ ... А_Н-1, определите, сколько будет общая стоимость.

Примеры

Н: 2
П₀: 2
П₁: 3
А₀: 1
А₁: 4
Результат: 14

Н: 5
П₀: 2
П₁: 7
П₂: 5
П₃: 1
П₄: 9
А₀: 1
А₁: 2
А₂: 3
А₃: 2
А₄: 3
Результат: 60

Помните, что это , поэтому побеждает код с наименьшим количеством байтов.

Таблицы лидеров

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

Чтобы ваш ответ появился, начните его с заголовка, используя следующий шаблон Markdown:

       <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>

где body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px} is the size of your submission. If you improve your score, you может держите старые результаты в заголовке, вычеркивая их. Например:

var QUESTION_ID=95128,OVERRIDE_USER=12537;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

Если вы хотите включить в заголовок несколько чисел (например, потому что ваша оценка представляет собой сумму двух файлов или вы хотите перечислить штрафы за флаги интерпретатора отдельно), убедитесь, что фактическая оценка соответствует последний номер в шапке:

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

Вы также можете сделать название языка ссылкой, которая затем будет отображаться во фрагменте таблицы лидеров:

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

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

N

# Language Name, N bytes

#код-гольф #код-гольф #математика #число

Bhorik

На самом деле, 1 байт

                                       for i ($p)((S+=i*a[++j]))

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

Хорошо, это самое короткое встроенное скалярное произведение, которое я смог найти. >_>

Marraf

Желе, 2 байта

+´×

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

Встроенная функция вычисления скалярного произведения между двумя входными векторами: если для каждого 1 ≤ я ≤ н, Мы покупаем а_я предметы, стоящие п_я каждый, формула общей стоимости: а₁п₁ + а₂п₂ + … +а_нп_н, что и является определением скалярного произведения.

Golodranec

Математика, 1 байт

param($p,$q)$p|%{$r+=$_*$q[$i++]}
$r

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

function d($a,$b){$a|%{$r+=$_*$b[$i++]};$r}

||answer||

TI-Basic, 12 байт

sum((*).(x,y))

||answer||

Хаскель, 17 байт

<?=array_sum(array_map(array_product,$_GET[a]));

Умножьте списки по пунктам, затем просуммируйте. Короче, чем импорт (23 байта)

<?foreach($_GET[a]as$n)$s+=$n[0]*$n[1];echo$s;

||answer||

Питон, 36 33 байта

Спасибо @xnor за то, что он сэкономил 3 байта!

Проверьте это на идея.

Vestniki

Рубин, 34 23 + 9 = 32 байта

+9 байт для s flag.

+.×  ⍝ My code is self-documenting

Посмотрите это на eval.in: https://eval.in/653676

Mqw9enuv

Пиф, 3 байта

f(n,p,a,s)

int*p,*a;
{

for(s=0;n;s+=p[--n]*a[n]);

return s;
}

(s) суммирует (V) векторизованное (*) произведение двух входных массивов.

Настя 1991

MATLAB/Октава, 4 байта

f(n,p,a,s)int*p,*a;{for(s=0;n;s+=p[--n]*a[n]);return s;}

Это определяет анонимную функцию.

Попробуйте в Ideone.

Timofeyliss

С#, 25 байт

([p[0],...,p[n-1])([a[0],...,a[n-1]])

Пример программы:

a=>b=>a.reduce((c,d,e)=>c+d*b[e])

||answer||

Р, 8 18 байт

`%*%`

Теперь принимает ввод со стандартного ввода.

Barmknikimi

Джулия 1.0, 13 байт

Наращивание доната решение. Спасибо Chartz с опозданием за указание на проблему с входными данными.

øPO  # full program

O  # sum of...

P   # products of...

# (implicit) each element in...

# implicit input...
ø    # with each element from the first sublist paired with the corresponding element from the second sublist

# implicit output

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

Max nepo

МАТЛ, 2 байта

øPO

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

32 ||answer||

Ява, 67 байт

{1,2,3→L1
{4,5,6→L2
prgmCOST

Немного не в гольфе:

Ans ||answer||

Перл 6, 13 байт

L₂

Входные данные представляют собой список из двух списков.

Пример:

L₁

Объяснение:

sum(L₁L₂

||answer||

ТИ-БЕЙСИК, 3 жетона

{          # bare block lambda with implicit parameter ｢$_｣

[+]      # reduce using addition operator

[Z*]   # reduce using zip meta-operator combined with multiplication operator

$_   # the argument ( list of lists )
}

Ввод в say {[+] [Z*] $_}( ((2,7,5,1,9),(1,2,3,2,3)) ); # 60 and {[+] [Z*] $_} , вывод в public static int pay(int...a){ int p=0; for(int i=-1;++i<a[0];){ p+=a[i+1]*a[i+a[0]+1]; } return p; } .

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

a->{int p=0;for(int i=-1;++i<a[0];)p+=a[i+1]*a[i+a[0]+1];return p;}

Выход: * % Element-wise product of two implicit inputs s % Sum of array, implicitly displayed

Aisuly2007

05AB1E, 3 байта

*s

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

x/y=sum(x.*y)

||answer||

Р, 5 байт

sum(scan()*scan())

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

Это скалярное произведение, встроенное в R...

Heiter

JavaScript, 33 байта

using System.Linq;
using Xunit;
public class Tests {

[Fact]

public void Cost() {

int[] p = new [] { 2, 7, 5, 1, 9 };

int[] a = new [] { 1, 2, 3, 2, 3 };

int r = p.Zip(a, (x, y) => x * y).Sum();

Assert.Equal(60, r);

}
}

Принимает ввод как p.Zip(a,(x,y)=>x*y).Sum() .

Nik0954

С, 58 56 байт

@dot

Ввод: n: количество элементов, p:массив 1, a:массив 2.

Немного не в гольф:

s*V

||answer||

АПЛ (Диалог Классик), 3 байта

->p,a{Vector[*p].dot a}

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

Vsmok

Виксал `-rmatrix` , 1 byte

lambda*x:sum(map(int.__mul__,*x))

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

Магия.

Веня

PHP, 46 байт

import Data.Vector
vdot

48 байт

(sum.).zipWith(*)

||answer||

Юля 1.0, 14 байт

Prompt L1,L2
sum(L1L2

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

Himpost

PowerShell, 43 байта

{1, 2, 3}.{4, 5, 6}

(* 32 *)

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

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

RobertSarf

PowerShell, 36 байт

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

Lyu1231

БКН, 3 байта

æ.

Попробуйте!

скалярное произведение

Natililnat

Зш, 31 25 байт

Попробуйте онлайн. _{старые 31 байт}

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

Похожие темы	Дата
Codegolf — Цифры, Которые На Самом Деле Являются Буквами	19.12.2024, 05:12
Вызов Кода — Подсчет Зерен Риса	19.12.2024, 05:12
Codegolf - Мини-Гольф - Отображать Что-Нибудь В 3D	19.12.2024, 05:12
Codegolf - 5318008 - Развлечения С Калькуляторами	19.12.2024, 05:12
Codegolf — Распечатайте Все Способы Получения Определенного Номера, Используя Только Определенные Цифры.	19.12.2024, 05:12
Codegolf - Привет, Человек, Я Хочу Восстановить Мои Маленькие Кошачьи Фотографии	19.12.2024, 05:12
Обработка Изображений — Вы Называете Это Центрированием, Я Называю Это Кодом Гольфа	19.12.2024, 05:12
Codegolf — Транспонировать Облако Слов	19.12.2024, 05:12
Codegolf - S̶t̶r̶i̶k̶e̶t̶h̶r̶o̶u̶g̶h̶ Список Поиска Слов	19.12.2024, 05:12
Напишите Задачу По Гольфу На Коде, В Которой Java Победит.	19.12.2024, 05:12

Codegolf – Сколько Это Будет Стоить?

Примеры

Таблицы лидеров

На самом деле, 1 байт

Желе, 2 байта

Математика, 1 байт

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

TI-Basic, 12 байт

Хаскель, 17 байт

Питон, 36 33 байта

Рубин, 34 23 + 9 = 32 байта

Пиф, 3 байта

MATLAB/Октава, 4 байта

С#, 25 байт

Р, 8 18 байт

Джулия 1.0, 13 байт

МАТЛ, 2 байта

Ява, 67 байт

Перл 6, 13 байт

Пример:

Объяснение:

ТИ-БЕЙСИК, 3 жетона

05AB1E, 3 байта

Р, 5 байт

JavaScript, 33 байта

С, 58 56 байт

АПЛ (Диалог Классик), 3 байта

Виксал -rmatrix , 1 byte

PHP, 46 байт

Юля 1.0, 14 байт

PowerShell, 43 байта

PowerShell, 36 байт

БКН, 3 байта

Зш, 31 25 байт

Интересно

Виксал `-rmatrix` , 1 byte