Числа, суммы, продукты

9

Учитывая сетку неотрицательных целых чисел 20 × 20, найдите подрешетку 3 × 3, где произведение сумм отдельных строк достигает максимума. Говорят в формулах:

Учитывая подсеть 3 × 3

матрица от (1,1) до (3,3)

функция максимизации

f (A) = (x_11 + x_12 + x_13) ⋅ (x_21 + x_22 + x_23) ⋅ (x_31 + x_32 + x_33)

Для каждой строки рассчитывается сумма, а затем умножаются отдельные суммы.

Пример (только 5 × 5):

Пример с выделенной максимальной сеткой 3 × 3

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

(35 + 272 + 167) ⋅ (163 + 270 + 242) ⋅ (216 + 68 + 266) = 175972500

вход

Ввод осуществляется на стандартном вводе и состоит из 20 строк, каждая из которых содержит 20 чисел, разделенных пробелом (U + 0020). Числа достаточно малы, чтобы 32-разрядное целое число со знаком было достаточным для вычисления результата.

Вы можете предполагать, что ввод будет перенаправлен из файла.

Вывод

Выходные данные являются результатом функции F (A)для подсетки 3 × 3, которая дает наибольший результат. В приведенном выше примере это было бы 175972500.

Пример ввода 1

1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 5 5 5 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 5 5 5 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 5 5 5 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1

Пример вывода 1

3375

Пример ввода 2

40 30 42 222 74 265 93 209 115 274 139 177 7 274 12 15 103 36 236 91
294 97 35 272 167 126 18 262 292 48 8 296 85 93 245 4 4 240 276 153
52 8 163 270 242 224 142 72 99 240 199 26 224 198 96 242 295 70 56 247
247 130 216 68 266 142 93 214 30 8 12 163 59 84 40 287 233 65 30 242
283 245 164 53 148 282 73 186 296 3 9 233 184 30 205 221 92 96 5 101
132 228 43 91 228 37 266 140 159 109 10 230 40 114 264 3 266 164 219 283
70 207 218 28 299 78 279 30 179 118 196 138 61 229 110 55 203 73 124 112
16 232 28 187 292 78 194 70 65 203 255 227 176 21 32 225 11 15 92 151
58 237 261 41 213 171 170 111 4 209 99 194 40 108 267 137 179 31 35 221
184 209 264 275 163 268 261 40 198 185 45 188 280 273 54 79 270 286 273 121
208 83 66 156 104 62 188 68 53 194 46 279 280 170 266 148 272 285 178 245
210 130 213 118 165 210 213 66 54 189 166 193 57 213 14 101 143 109 172 101
80 193 287 4 140 65 208 111 8 206 107 285 109 29 211 78 170 247 290 193
148 123 15 164 28 153 222 67 156 165 6 163 114 77 165 17 143 209 278 100
3 102 58 148 82 181 84 29 2 236 231 195 118 278 252 257 179 123 276 287
143 141 254 142 200 243 171 32 164 195 235 260 269 191 190 46 65 166 82 146
69 194 65 220 234 110 45 135 125 208 138 20 233 291 256 162 148 216 247 138
10 53 164 107 2 270 226 227 88 206 193 13 41 130 218 249 76 35 207 91
199 36 207 256 58 215 28 277 234 29 198 148 219 244 136 16 30 258 219 264
183 118 48 218 15 125 279 103 73 8 86 113 9 157 239 273 146 208 50 86

Пример вывода 2

328536000

Пример ввода 3

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Пример вывода 3

185193

Пример ввода 4

242 248 292 60 9 45 94 97 294 202 219 118 115 243 207 81 288 289 241 232
236 225 205 227 242 85 139 63 5 162 170 121 208 133 22 235 125 288 209 270
31 182 108 170 88 268 297 66 249 158 285 157 267 117 150 18 44 66 117 223
205 32 93 132 33 99 209 282 222 272 255 1 80 270 202 54 117 35 139 273
87 74 113 146 177 14 154 92 282 4 192 60 171 286 66 299 89 276 138 289
60 16 143 277 202 284 77 296 215 96 200 10 226 143 136 131 218 246 254 20
244 118 299 218 81 195 129 93 205 202 264 141 196 150 214 72 231 136 243 192
236 157 176 187 104 182 134 29 151 234 81 143 22 119 45 241 17 225 197 7
156 284 92 13 131 60 113 77 228 65 200 83 3 63 83 88 241 113 115 198
62 101 242 270 121 122 119 78 105 273 55 7 239 236 37 252 66 164 56 44
70 57 100 87 34 298 140 259 36 257 1 204 110 299 245 56 43 121 192 10
240 36 272 255 10 194 143 66 27 131 22 78 57 71 128 5 1 155 236 122
281 160 42 147 272 151 196 240 291 280 209 245 271 46 103 35 85 145 78 140
155 74 232 205 235 223 147 39 171 240 56 187 184 70 28 81 293 125 283 159
297 203 75 46 221 77 106 12 268 94 220 156 78 97 266 208 228 137 212 49
4 157 69 51 225 23 61 202 19 23 41 260 161 218 142 251 299 187 283 158
118 136 71 77 21 199 110 87 103 120 153 157 213 234 155 141 135 24 120 199
16 204 292 245 54 260 294 159 254 15 209 41 154 54 231 167 87 291 31 26
212 274 99 199 170 184 47 227 64 2 117 275 67 84 143 214 143 125 24 61
205 250 133 88 210 112 4 160 3 287 54 143 293 94 287 42 105 94 76 169

Пример вывода 4

311042813

Для интересующихся длинами представлений, которые мы получили в нашем конкурсе:

120 - AWK
124 - C
133 - Haskell
174 - C
270 - VB.NET

И наши собственные (без рейтинга) решения:

  55 - Golfscript
118 - Ruby
192 - PowerShell

code-golf  optimization 
— детеныш
источник

Ответы:

5

J, 38

":@(>./@,@(3*/\3+/\"1".;._2))&.stdin''

Образец использования:

$ jconsole nsp.ijs <g1
3375
$ jconsole nsp.ijs <g2
328536000
$ jconsole nsp.ijs <g3
185193

Грубые объяснения:

  • ".;._2преобразует необработанный ввод в матрицу, ":преобразует результат в необработанный вывод
  • 3+/\"1 суммы по столбцам, 3 на 3
  • 3*/\ умножает построчно, 3 на 3
  • , выравнивает результат
  • >./ извлекает максимум
  • &.stdin'' делает из него фильтр
— JB
источник
3
прохладно__________!
— ВЫ
Отличная игра в гольф!
— Eelvex
@ S.Mark __________!
— Матин Улхак
6

Python - 146 символов

g=[map(int,raw_input().split(' '))for i in' '*20]
r=range(18)
print max(reduce(int.__mul__,[sum(v[j:j+3])for v in g[i:i+3]])for j in r for i in r)
— Juan
источник
Аргумент для разделения не нужен и может сэкономить три байта. Еще более коротким способом чтения ввода является g=eval('map(int,raw_input().split()),'*20)сохранение еще четырех байтов в общей сложности 139.
— hallvabo
3

C #, 324 321 308 символов

using System;using System.Linq;class X{static void Main(){int m=0,v,x=0,y;Func<int[],int>f=t=>t[x]+t[x+1]+t[x+2];var a=Console.In.ReadToEnd().Trim().Split('\n').Select(l=>l.Split(' ').Select(int.Parse).ToArray()).ToList();for(;x<18;x++)for(y=0;y<18;m=m>v?m:v)v=f(a[y])*f(a[++y])*f(a[y+1]);Console.Write(m);}}

Удобочитаемый:

using System;
using System.Linq;
class X
{
    static void Main()
    {
        int m = 0, v, x = 0, y;
        Func<int[], int> f = t => t[x] + t[x + 1] + t[x + 2];
        var a = Console.In.ReadToEnd().Trim().Split('\n').Select(l =>
            l.Split(' ').Select(int.Parse).ToArray()).ToList();
        for (; x < 18; x++)
            for (y = 0; y < 18; m = m > v ? m : v)
                v = f(a[y]) * f(a[++y]) * f(a[y + 1]);
        Console.Write(m);
    }
}

Можно убрать 14 символов, удалив оба вызова, .Trim()если вы можете гарантировать, что для ввода будет использоваться только \n(нет \r), а после последней строки чисел нет новой строки.

Правки

  • (333 → 324 символа) Понял, что я мог бы добавить x, yк объявлению вверху, вместо того, чтобы объявлять каждый в forзаявлении; что я мог бы изменить одну из ToArrayс ToList; что я мог увеличить yв вызове fи таким образом избавиться от него в for.

  • (324 → 321 символ) Переместите назначение mв forоператор, избавившись от точки с запятой и двух фигурных скобок.

  • (321 → 308 символов) Предложения Джои в комментариях. Спасибо!

— Timwi
источник
Я испытываю искушение к -1 за использование технологии, совершенно не подходящей для игры в гольф ... :)
— RomanSt
Trim()В int.Parseвызове действительно может быть удален (он игнорирует конечные пробелы) (314). Затем вы также можете позвонить Selectс таким int.Parseже аргументом; там больше нет необходимости в лямбде (308). Я думаю, что это можно сделать короче, если работать с 1-мерным массивом из 400 элементов вместо списка массивов, как у вас сейчас, но я не могу сейчас его адаптировать ;-)
— Joey
@Joey: Wow ... ты заставляешь меня чувствовать себя нуб :) Спасибо!
— Тимви
3

Ява, 299 символов

    class M{public static void main(String[]a){java.util.Scanner s=new java.util.Scanner(System.in);int i,j,k,p,m,t=20,x[][]=new int[t][t];for(i=m=0;i<t*t;i++)x[i/t][i%t]=s.nextInt();for(i=0;i<18;i++)for(j=0;j<18;j++,m=p>m?p:m)for(p=1,k=i;k<i+3;k++)p*=x[k][j]+x[k][j+1]+x[k][j+2];System.out.print(m);}}
— st0le
источник
Я делаю что-то неправильно? Данный код весит здесь 318 байт. В любом случае, класс не должен быть public, вы можете вытащить объявление массива xв предыдущую строку с помощью x[][]=new int[t][t]. Вы можете использовать одномерный массив, который значительно упрощает доступ. Вы можете удалить importи просто вставить в java.util.два раза, что на 5 байт короче. Вы можете встроить, eчто экономит 3 байта. При всем этом я получил его до 290 байт.
— Джои
@ Джои, извините за это, использовал Notepad ++, ошибочно прочитанный Char Count (no spaces). Будет делать большинство из этих изменений. Код сильно изменится, если я использую одномерный массив.
— st0le
Ну, это изменяет декларацию на x[]=new int[t*t], инициализацию на x[i]=s.nextInt();и обновление pна p*=x[t*k+j]+x[t*k+j+1]+x[t*k+j+2];. Ничего особенного, я думаю :-)
— Joey
enum M{M;{code;}}и, возможно, вы можете объединить приращения и циклические условия.
— Наб
С class M{static{java.util.Scanner s=...вами приходят 271. Улучшение 10%. :) Вы получаете сообщение об ошибке после вывода, но можете молча игнорировать его. :)
— пользователь неизвестен
2

Python (202)

import sys; g = map (лямбда l: map (int, l.split ()), sys.stdin.readlines ())
г = диапазон (18)
для j в диапазоне (20): l = g [j]; g [j] = [сумма (l [i: i + 3]) для i в r]
g = [g [i] [j] * g [i + 1] [j] * g [i + 2] [j] для i в r для j в r]
печать макс (г)

Редактировать: Исправлено, что г был диапазон (18) вместо 17.

— Хоа Лонг Там
источник
2

Рубин - 78 символов

g=*$<
p (0..324).map{|i|eval g[i/18,3].map{|r|eval r.split[i%18,3]*?+}*?*}.max
— Dogbert
источник
2

Рубин, 106 знаков

k=$<.read.split.map &:to_i;p (0..358).map{|a|a%20>17?0:(0..2).map{|i|k[20*i+a,3].inject:+}.inject(:*)}.max

Еще одно простое решение.

  • Изменить: Предыдущее решение дало неправильные результаты для некоторых крайних случаев.
  • Изменить: (114 -> 106) Используйте плоский массив, проверьте, index%20чтобы предотвратить переполнение в следующую строку.
— Ventero
источник
2

Windows PowerShell, 116 117 124 152 170

$g=-split$input
(0..359|?{$_%20-le17}|%{$i=$_
(0..2|%{$g[($a=$i+20*$_)..($a+2)]-join'+'|iex})-join'*'|iex}|sort)[-1]

На самом деле, довольно просто.

— детеныш
источник
2

C 184 171 символов

#define f(i,b)for(i=0;i<b;i++)
i,j,k,l,m,M,s,a[400];main(){f(i,400)scanf("%d",a+i);f(i,18)f(j,18){m=1;f(k,3){s=0;f(l,3)s+=a[(i+k)*20+j+l];m*=s;}M=m>M?m:M;}printf("%d",M);}
— fR0DDY
источник
Вы можете выжать еще несколько символов, используя #define f(i,b)for(i=0;i<b;i++)и удаляя 0,из вызовов.
— Джои Адамс
@ Джой О, да! Я полностью пропустил это. Спасибо
— fR0DDY
Вы можете использовать #define f(i,b)for(i=b;--i;)вместо этого?
— Набб
1

J + tr, 84 + 10

y=:20 20$".(1!:1)3
s=:3 :'(y&((][;.0~3 3,:~[)~))"1(,."0/~i.18)'
>./,([:*/+/"1)"2 s y

работает так, < golfdata tr \\n ' '| ./test.ijsпоэтому я рассматриваю эту tr \\n ' 'часть как часть программы.

y=: 40 30 43 ...
>./,([:*/+/"1)"2 s y
328536000

z =: 20 20 $>:i.20
>./,([:*/+/"1)"2 s z
185193
— Eelvex
источник
Какой самый простой способ запустить J ответы?
— Гнибблер
@gnibbler: единственный способ, которым я знаю (к сожалению), является загрузка и установка J.
— Eelvex
@gnibbler ... который с открытым исходным кодом . Ура.
— JB
1

Хаскель, 129 символов

import List
t f z@(_:y@(_:x))=zipWith3((f.).f)z y x
main=interact$show.maximum.(t(*)=<<).transpose.map(t(+).map read.words).lines
— MtnViewMark
источник
1

Golfscript, 48 символов

n%"{~}%:^,,{^>3<}%":|~{{+}*}%20/zip|~{{*}*}%$)p;

Предыдущая

n%{' '%"{~}%:^,,{^>3<}%":|~{{+}*}%}%zip|~{{*}*}%$)p;

Некоторые объяснения, но я все еще новичок в гольскрипте, некоторые могут быть неверными, пожалуйста, поправьте меня, если вы видите что-то не так.

n% # .lines
{# .each
   ' '% #.Трещина ' '
   "#" ... начало буквальной строки
      {~}% # .flatten
      : ^ # назначить переменную ^
      , # .size
      , # .times
      {# .each
         ^> # ^ [n:]
         3 <# [: 3]
      }% # .map end
   "# ..." конец строки
   : | #assign буквенную строку в переменную | использовать позже
   ~ #eval
   {# .each
      {+} # сумма
      * # .fold
   }% # .map end
}% # .map end
zip # .zip
| ~ #eval переменная | против результата .zip
{# .each
   {*} #товар
   * # .fold
}% # .map end
$ # .sort
) #uncons / .pop
p #puts
; #discard верхний элемент из стека

тесты

$ cat sample-1159-1.txt | golfscript codegolf-1159.gs
3375

$ cat sample-1159-2.txt | golfscript codegolf-1159.gs
328536000

$ cat sample-1159-3.txt | golfscript codegolf-1159.gs
185193
— ВЫ
источник
1

APL (Dyalog Unicode) , 22 байта SBCS

Полная программа.

⌈/,{×/+/⍵}⌺3 3↑⍎20⍴'⎕'

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

20⍴'⎕' изменить форму символа ⎕(который обозначает оцененный ввод из стандартного ввода) до длины 20

⍎ выполнить это (дает использовать 20 списков)

↑ смешать списки в матрицу

{… }⌺3 3 На каждой подматрице 3 на 3:

 +/⍵ суммировать строки

 ×/ умножить суммы

, сгладить матрицу сумм

⌈/ найти максимум

— Адам
источник
0

Powershell, 103 байта

(($x=-split($args-replace'(\d+)(?= (\d+) (\d+))','$1+$2+$3')|iex)|%{$_*$x[$j+20]*$x[$j+++40]}|sort)[-1]

Объяснение:

  • Регулярное выражение преобразовывает каждую строку как 1 2 3 4 5 6в строку как 1+2+3 2+3+4 3+4+5 5 6;
  • Затем скрипт разбивает строку 1+2+3 2+3+4 3+4+5 5 6по пробелам и оценивает каждый элемент по iex(псевдоним Invoke-Expression ). Результатом является массив как 6,9,11,5,6;
  • Наконец, скрипт объединяет все массивы в один, вычисляет продукты и возвращает максимум.

Важно, чтобы нам было нужно максимальное количество произведений суммы неотрицательных целых чисел . Таким образом, нам не нужно отфильтровывать последние 2 значения в каждой строке и последние 2 строки.

Менее гольф тестовый сценарий

$f = {

$x=-split($args-replace'(\d+)(?= (\d+) (\d+))','$1+$2+$3')|iex
($x|%{$_*$x[$j+20]*$x[$j+++40]}|sort)[-1]

}

@(
    ,(  3375,
        "1 2 3 4 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "4 3 2 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "4 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 5 5 5 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 5 5 5 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 5 5 5 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1",
        "1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1")
    ,(  328536000,
        "40 30 42 222 74 265 93 209 115 274 139 177 7 274 12 15 103 36 236 91",
        "294 97 35 272 167 126 18 262 292 48 8 296 85 93 245 4 4 240 276 153",
        "52 8 163 270 242 224 142 72 99 240 199 26 224 198 96 242 295 70 56 247",
        "247 130 216 68 266 142 93 214 30 8 12 163 59 84 40 287 233 65 30 242",
        "283 245 164 53 148 282 73 186 296 3 9 233 184 30 205 221 92 96 5 101",
        "132 228 43 91 228 37 266 140 159 109 10 230 40 114 264 3 266 164 219 283",
        "70 207 218 28 299 78 279 30 179 118 196 138 61 229 110 55 203 73 124 112",
        "16 232 28 187 292 78 194 70 65 203 255 227 176 21 32 225 11 15 92 151",
        "58 237 261 41 213 171 170 111 4 209 99 194 40 108 267 137 179 31 35 221",
        "184 209 264 275 163 268 261 40 198 185 45 188 280 273 54 79 270 286 273 121",
        "208 83 66 156 104 62 188 68 53 194 46 279 280 170 266 148 272 285 178 245",
        "210 130 213 118 165 210 213 66 54 189 166 193 57 213 14 101 143 109 172 101",
        "80 193 287 4 140 65 208 111 8 206 107 285 109 29 211 78 170 247 290 193",
        "148 123 15 164 28 153 222 67 156 165 6 163 114 77 165 17 143 209 278 100",
        "3 102 58 148 82 181 84 29 2 236 231 195 118 278 252 257 179 123 276 287",
        "143 141 254 142 200 243 171 32 164 195 235 260 269 191 190 46 65 166 82 146",
        "69 194 65 220 234 110 45 135 125 208 138 20 233 291 256 162 148 216 247 138",
        "10 53 164 107 2 270 226 227 88 206 193 13 41 130 218 249 76 35 207 91",
        "199 36 207 256 58 215 28 277 234 29 198 148 219 244 136 16 30 258 219 264",
        "183 118 48 218 15 125 279 103 73 8 86 113 9 157 239 273 146 208 50 86")
    ,(  185193,
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20",
        "1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20")
    ,(  311042813,
        "242 248 292 60 9 45 94 97 294 202 219 118 115 243 207 81 288 289 241 232",
        "236 225 205 227 242 85 139 63 5 162 170 121 208 133 22 235 125 288 209 270",
        "31 182 108 170 88 268 297 66 249 158 285 157 267 117 150 18 44 66 117 223",
        "205 32 93 132 33 99 209 282 222 272 255 1 80 270 202 54 117 35 139 273",
        "87 74 113 146 177 14 154 92 282 4 192 60 171 286 66 299 89 276 138 289",
        "60 16 143 277 202 284 77 296 215 96 200 10 226 143 136 131 218 246 254 20",
        "244 118 299 218 81 195 129 93 205 202 264 141 196 150 214 72 231 136 243 192",
        "236 157 176 187 104 182 134 29 151 234 81 143 22 119 45 241 17 225 197 7",
        "156 284 92 13 131 60 113 77 228 65 200 83 3 63 83 88 241 113 115 198",
        "62 101 242 270 121 122 119 78 105 273 55 7 239 236 37 252 66 164 56 44",
        "70 57 100 87 34 298 140 259 36 257 1 204 110 299 245 56 43 121 192 10",
        "240 36 272 255 10 194 143 66 27 131 22 78 57 71 128 5 1 155 236 122",
        "281 160 42 147 272 151 196 240 291 280 209 245 271 46 103 35 85 145 78 140",
        "155 74 232 205 235 223 147 39 171 240 56 187 184 70 28 81 293 125 283 159",
        "297 203 75 46 221 77 106 12 268 94 220 156 78 97 266 208 228 137 212 49",
        "4 157 69 51 225 23 61 202 19 23 41 260 161 218 142 251 299 187 283 158",
        "118 136 71 77 21 199 110 87 103 120 153 157 213 234 155 141 135 24 120 199",
        "16 204 292 245 54 260 294 159 254 15 209 41 154 54 231 167 87 291 31 26",
        "212 274 99 199 170 184 47 227 64 2 117 275 67 84 143 214 143 125 24 61",
        "205 250 133 88 210 112 4 160 3 287 54 143 293 94 287 42 105 94 76 169")
) | % {
    $expected, $a = $_
    $result = &$f @a
    "$($result-eq$expected): $result"
}

Вывод

True: 3375
True: 328536000
True: 185193
True: 311042813

Powershell, 105 байт, альтернатива без регулярных выражений

Дань умному выражению |?{$_%20-le17}в ответе Джои :

(($x=($y=-split$args)|?{$i++%20-le17}|%{+$y[$i-1]+$y[$i]+$y[$i+1]})|%{$_*$x[$j+18]*$x[$j+++36]}|sort)[-1]
— Mazzy
источник
Это не соответствует спецификации ввода.
— Джои
Почему? ..........
— Маззи
Ваш скрипт принимает входные данные в качестве аргументов вместо стандартного ввода.
— Джои
Почему вы думаете, что «стандартный ввод» - это только «стандартный ввод»?
— Маззи
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.