Лучше поздно, чем никогда!

12

Ваша программа / функция и т. Д. Займет 2 входа. Первым будет список тех, кто пришел на мою вечеринку и когда. Пример:

Kevin 13:02  
Ruby 5  
Sam 3  
Lisa 6  
Bob 12  

Что это обозначает? Это означает, что Кевин сначала пришел на мою вечеринку (в 13:02, 24-часовое время), затем Руби через 5 минут, затем Сэм через 3 минуты, затем Лиза через 6 минут и последний Боб через 12 минут.

Второй вход будет, когда началась моя вечеринка. Пример:

13:15

(24-часовое время). Ваш вывод должен быть список людей, которые опоздали. (Любой точно в срок в порядке.) Примеры вычислений (например, не выводите их)

Kevin 13:02
Ruby 13:07
Sam 13:10
Lisa 13:16
Bob 13:28

Лиза и Боб прибыли позже 13:15, поэтому в этой программе должно быть напечатано «Лиза, Боб».

Исходные предположения

  • Входные данные 1 всегда будут именем (регулярное выражение [A-Z][a-z]*), затем пробелом, 24-часовым временем в форме hours:minutesв первой строке, затем именем, пробелом и положительным целым числом (через несколько минут) в следующих строках. , Всегда будет хотя бы 1 строка.
  • Если вы хотите, вы можете взять ввод 1 с любым другим символом вместо переноса строки.
  • Вход 2 будет в формате hours:minutes.
  • Вы можете взять свои входные данные как одну строку, разделенную любым символом, если хотите. Это необязательно.
  • Не беспокойся о дневном переходе. Мои вечеринки никогда не после 23:59.

Правила вывода

  • Вывод может быть возвращаемым значением функции или строкой, передаваемой в STDIN, файлом и т. Д. Вы должны вернуть строку или массив / список.
    • Если вы возвращаете строку, это должен быть каждый опоздавший (порядок не имеет значения), разделенный любым не алфавитно-цифровым разделителем.
    • Если вы возвращаете массив / список, это должен быть список всех, кто опоздал.
programmer5000
источник
2
Нужен ли строгий формат ввода? Может ли, например, первый ввод представлять собой список списков, каждый из которых представляет собой «строку», содержащую два элемента данных?
Джонатан Аллан
«Вход 1 всегда будет именем (regex [A-Z][a-z]*)». Предполагает ли это, что имена могут быть пустыми?
HyperNeutrino
2
Я предполагаю, что вы имели в виду "да, строгий формат ввода необходим".
Джонатан Аллан
2
Строгий формат ввода делает этот вызов менее интересным
Луис Мендо,
3
«Мои вечеринки никогда не проводятся после 11:59». ты имеешь ввиду 23:59?
TSH

Ответы:

3

MATL , 31 байт

jYb1L&)1&)XUYs1440/0whwYO+jYO>)

В первом вводе вместо пробела используется пробел (разрешено вызовом).

Выход использует разрыв строки в качестве разделителя.

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

объяснение

j       % Input first string
Yb      % Split at spaces. Gives cell array of strings
1L&)    % Separate into subarrays with odd and even indices. Odd are names, even
        % are time and increments in minutes
1&)     % Separate the subarray of even indices into first entry and remaining
        % entries. The first is a string representing the time of first arrival,
        % the rest are strings representing increments in minutes
XU      % Convert strings representing increments into the actual numbers
Ys      % Cumulative sum
1440/   % Divide by 1440 (number of minutes in a day)
0wh     % Prepend a 0
w       % Swap. Bring the string with time of first arrival to the top
YO      % Convert to serial date number. Fractional part indicates time
+       % Add. This gives all arrivals as serial date numbers
j       % Input second string
YO      % Convert to serial date number
>       % Less than?, element-wise
)       % Index: select the names for which the comparison gave true
        % Implicitly display
Луис Мендо
источник
6

JavaScript (ES6), 98 97 байт

Сохранено 1 байт благодаря Нейлу

Принимает список гостей lи время вечеринки hв карри синтаксиса (l)(h). Ожидает разрыв строки в списке. Возвращает разделенный пробелами список имен, таких как Lisa Bob.

l=>h=>l.replace(/(.* )(.*)\n/g,(_,a,b)=>(t-=T(b))<0?a:'',t=(T=h=>eval(h.replace(/:/,'*60+')))(h))

Отформатировано и прокомментировано

l => h =>                         // given a list of guests l and a party time h
  l.replace(                      // for each guest in l:
    /(.* )(.*)\n/g,               //   extract the name a and arrival time b
    (_, a, b) =>                  //   subtract the arrival time from the time counter
      (t -= T(b)) < 0 ?           //   if the result is negative:
        a                         //     the guest is late: keep the name
      :                           //   else:
        '',                       //     the guest is on time: remove this entry
    t = (                         //   initialize the time counter t
      T = h =>                    //   define T():
        eval(                     //     a function that takes either a time
          h.replace(/:/, '*60+')  //     in hh:mm format or an amount of minutes
        )                         //     and returns an amount of minutes   
    )(h)                          //   call it with the party time
  )                               // end of replace()

демонстрация

let f =

l=>h=>l.replace(/(.* )(.*)\n/g,(_,a,b)=>(t-=T(b))<0?a:'',t=(T=h=>eval(h.replace(/:/,'*60+')))(h))

console.log(f(`Kevin 13:02
Ruby 5
Sam 3
Lisa 6
Bob 12
`)('13:15'))

Arnauld
источник
Умное решение! +1. Мое далеко ....... :(
Арджун
Не (.*) (.*)\nработает?
Нил
@Neil Будучи жадным по умолчанию, первый (.*)будет соответствовать всей строке.
Arnauld
Тогда что пространство будет соответствовать?
Нил
@ Нил Ой, прости, ты прав.
Arnauld
6

PHP, 118 98 95 91 байт

while($n=$argv[++$i])$i&1?$p=$n:($t=($f=strtotime)($n)?:$t+60*$n)<=$f(end($argv))?:print$p;

принимает входные данные из аргументов командной строки (вы можете интерпретировать это как строки, разделенные пробелами, если хотите); печатает имена без разделителя. Запустите -rили протестируйте его онлайн .

редактировать 1: сохранено 20 байтов с прямой печатью
редактировать 2: сохранено 3 байта путем удаления разделителя
редактировать 3: сохранено 4 байта благодаря использованию того, что простые целые числа не являются действительными датами дляstrtotime

сломать

while($n=$argv[++$i])       # loop through arguments, skip [0]
    $i&1                        # if index is odd   
    ?   $p=$n                   # then assign name to $p
    :   ($t=                    # else $t =
        ($f=strtotime)($n)          # if $n is a valid time, parse it
        ?:$t+60*$n                  # else add $n minutes to current $t
        )<=$f(end($argv))           # if $t <= parsed party start
        ?                           # then do nothing
        :print$p;                   # else print name
Titus
источник
6

с, 178 байт

main(c,o,d,e,g,O,l,f,x,y)char**o,d[80],*O,*l,*f;{for(sscanf(o[2],"%d:%d",&e,&g),x=e*60+g,l=";",f=o[1];O=strtok(f,l);f=0)(y=sscanf(O,"%s%d:%d",d,&e,&g)^2?e*60+g:y+e)>x?puts(d):0;}

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

Йохан дю Туа
источник
5

JavaScript ES6, 185 байт

l=>t=>l.split`
`.map(p=>p.split` `).map((p,i,a)=>[p[0],i?d(a[0][1])+a.slice(1,i+1).reduce((a,p)=>a+=+p[1],0)*6e4:(d=x=>Date.parse(`2017T${x}`))(p[1])]).filter(p=>p[1]>d(t)).map(p=>p[0])

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

const f = l=>t=>l.split`
`.map(p=>p.split` `).map((p,i,a)=>[p[0],i?d(a[0][1])+a.slice(1,i+1).reduce((a,p)=>a+=+p[1],0)*6e4:(d=x=>Date.parse(`2017T${x}`))(p[1])]).filter(p=>p[1]>d(t)).map(p=>p[0])


console.log(f('Kevin 13:02\nRuby 5\nSam 3\nLisa 6\nBob 12')('13:15'))

powelles
источник
Насколько я могу судить по спецификации, форма ввода может быть более строгой.
Джонатан Аллан
Я думаю, что сейчас это правильно.
Пауэлл
Да, я также спросил о строгости ввода.
Джонатан Аллан
... на самом деле у вас есть время на входе, а не смещения должны бытьf('Kevin 13:02\nRuby 5\nSam 3...
Джонатан Аллан
1
@JonathanAllan Спасибо. Понял сейчас.
Пауэлл
4

PowerShell , 215 196 180 байт

param($a,$b)$x,[array]$a=$a-split',';$z=@{};$i,$j=-split$x;$z[$i]=($y=date $j);0..($a.count-1)|%{$i,$j=-split$a[$_];$z[$i]=($y=$y|% *es $j)};($z|% *or|?{$_.value-gt(date $b)}).Name

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

Примерно 1/3 этого - входной разбор, так что я не уверен, насколько дальше я смогу это сделать.

Принимает ввод $aв виде разделенной запятыми строки имен и времени / минут, а $bтакже hh:mmв виде строки. Во- первых, мы -split $aна ,, сохранить первый результат в $xа оставшиеся в $a, с явной повторной складу $aкак array(так, чтобы петля позже работает должным образом). Мы инициализируем нашу хеш-таблицу $z, устанавливаем $iи $jдолжны быть $x -splitна пустом месте, и устанавливаем, $z[$i]чтобы быть dateиз $j(сохранены $yдля использования позже).

Затем мы перебираем оставшиеся $a. Каждую итерацию мы делаем аналогично - -splitстрока на пустом месте устанавливает соответствующий $zиндекс так, чтобы он был на много минут больше, чем мы сейчас находимся. Это использует укороченный трюк с именем свойства, чтобы сохранить несколько байтов, используя |% *es $jвместо .AddMinutes($j).

Наконец, мы .GetEnumerator()(опять - таки с помощью трюка) нашей Hashtable, и Where-Objectвыбрать те записи , с valueэтим -gля большей tхань $b(то есть, они опоздали на вечеринку). Затем мы выбираем только .Nameих. Выходные данные представлены в виде неявного массива, между которым по умолчанию Write-Outputвставляются символы новой строки.

Спасибо briantist за то, что напомнили мне, что [array] - это вещь. И еще куча подсказок по сокращенному названию свойства.

AdmBorkBork
источник
Я признаю, что сделал минимальное чтение и тестирование этого, но не могли бы вы просто сделать$x,[array]$a=$a-split',' ?
бриантист
1
@ briantist Да, спасибо. Я продолжал пытаться найти способ использовать оператор запятой в множественном присваивании, и он просто не работал. Я полностью забыл, что [array]это действительный актерский состав. Ха - ха. Думаю, слишком много в гольфе.
AdmBorkBork
Я на мобильном телефоне , так вне будет трудно проверить , но я думаю , что GetEnumeratorи AddMinutesявляются хорошими кандидатами для %метода синтаксиса
briantist
@briantist Да. Сохраняет еще 16. Спасибо!
AdmBorkBork
4

Python 2 , 140 148, 144 байта

t,h,n=map(str.split,input().replace(':','').split(';')),100,0
for a,v in t[:-1]:
 n+=int(v)
 if n%h/60:n=n/h*h+n%h%60+h
 if`n`>t[-1][0]:print a,

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

Формат ввода:

'Kevin 13:02;Ruby 5;Sam 3;Lisa 6;Bob 12;13:15'
Кеертана Прабхакаран
источник
Не справляется с переполнением минут: 'Kevin 13:47;Ruby 5;Sam 3;Lisa 6;Bob 12;14:00'ничего не печатает, хотя Лиза и Боб все еще опаздывают.
L3viathan
1
о, да. Был глюк! Починил это. Спасибо вам!
Киртана Прабхакаран
3

CJam, 66 54 58 54 51 49 46 байтов

{{':/60b}:K~)rSrKs++q+S/2/z~:i[{1$+}*]2$+$@#>}

Вход 1 дается через STDIN, вход 2 дается в виде строки в стеке. Выход - это массив в стеке. Разделителем для ввода 1 является пробел, например Kevin 13:02 Ruby 5 Sam 3 Lisa 6 Bob 12.

Трассировки стека:

         e# Stack:               | "13:15"
{        e# Define K and run it:
  ':/    e#   Split on colon:    | ["13" "15"]
  60b    e#   From base 60:      | 795
}:K~     e# End def
)        e# Increment:           | 796
r        e# Read token:          | 796 "Kevin"
S        e# Push space:          | 796 "Kevin" " "
r        e# Read another token:  | 796 "Kevin" " " "13:02"
K        e# K()                  | 796 "Kevin" " " 782
s        e# Convert to string:   | 796 "Kevin" " " "782"
++       e# Add together:        | 796 "Kevin 782"
q        e# Read rest of input:  | 796 "Kevin 782" " Ruby 5 Sam 3 Lisa 6 Bob 12"
+        e# Add together:        | 796 "Kevin 782 Ruby 5 Sam 3 Lisa 6 Bob 12"
S/       e# Split on spaces:     | 796 ["Kevin" "782" "Ruby" "5" "Sam" "3" "Lisa" "6" "Bob" "12"]
2/       e# Group by 2:          | 796 [["Kevin" "782"] ["Ruby" "5"] ["Sam" "3"] ["Lisa" "6"] ["Bob" "12"]]
z        e# Transpose:           | 796 [["Kevin" "Ruby" "Sam" "Lisa" "Bob"] ["782" "5" "3" "6" "12"]]
~        e# Unpack:              | 796 ["Kevin" "Ruby" "Sam" "Lisa" "Bob"] ["782" "5" "3" "6" "12"]
:i       e# Convert all to int:  | 796 ["Kevin" "Ruby" "Sam" "Lisa" "Bob"] [782 5 3 6 12]
[{1$+}*] e# Accumulate:          | 796 ["Kevin" "Ruby" "Sam" "Lisa" "Bob"] [782 787 790 796 808]
2$       e# Copy back element:   | 796 ["Kevin" "Ruby" "Sam" "Lisa" "Bob"] [782 787 790 796 808] 796
+        e# Add into array:      | 796 ["Kevin" "Ruby" "Sam" "Lisa" "Bob"] [782 787 790 796 808 796]
$        e# Sort:                | 796 ["Kevin" "Ruby" "Sam" "Lisa" "Bob"] [782 787 790 796 796 808]
#        e# Find index:          | ["Kevin" "Ruby" "Sam" "Lisa" "Bob"] 3
>        e# Slice:               | ["Lisa" "Bob"]

Объяснение:

  • Процедура Kконвертирует время hh:mmи число, представляющее, сколько минут это с полуночи.
  • Мы читаем от первого лица и заменяем их время на K (их время). Затем мы добавляем это в начало ввода.
  • Затем мы выполняем некоторые строковые операции, чтобы получить список имен и список раз, например [782 5 3 6 12].
  • Накапливая этот список, мы получаем [782 787 790 796 808], что дает время, когда все пришли.
  • Самый короткий способ определить, кто опоздал, - вставить время начала в массив, а затем пересортировать его, чтобы разместить его там, где и должно быть. Затем мы находим индекс, чтобы выяснить, где он находится, и затем нарезаем список имен из этого индекса.
Esolanging Fruit
источник
2

JavaScript, 285 283 байта

Принимает список гостей iи время вечеринки pв карри синтаксиса (i)(p). Возвращает разделенный запятыми список имен, таких как Lisa,Bob.

i=>p=>{n=i.split`
`,a=new Date(0,0,0,...n[0].split` `[1].split`:`),y=new Date(0,0,0,...p.split`:`),t=[a];w=a;n.slice(1).map((j,k,l)=>{h=l[k].split` `[1]*6e4;t.push(new Date(w.getTime()+h));w=new Date(w.getTime()+h)});return n.filter((j,k,l)=>t[k]>y).map(j=>j.split` `[0]).join()}

Я знаю, что это довольно долго и в настоящее время на последнем месте с большим отрывом, но это то, что я мог придумать.

f=i=>p=>{n=i.split`
`,a=new Date(0,0,0,...n[0].split` `[1].split`:`),y=new Date(0,0,0,...p.split`:`),t=[a];w=a;n.slice(1).map((j,k,l)=>{h=l[k].split` `[1]*6e4;t.push(new Date(w.getTime()+h));w=new Date(w.getTime()+h)});return n.filter((j,k,l)=>t[k]>y).map(j=>j.split` `[0]).join()}

console.log(f(`Kevin 13:02
Ruby 5
Sam 3
Lisa 6
Bob 12
`)('13:15'))

Арджун
источник
2

C # , 269 267 байт


Golfed

(l,t)=>{var h=System.DateTime.MinValue;var s=System.DateTime.ParseExact(t,"HH:mm",null);var o="";foreach(var p in l.Split('\n')){var i=p.Split(' ');h=h.Ticks<1?System.DateTime.ParseExact(i[1],"HH:mm",null):h.AddMinutes(int.Parse(i[1]));if(h>s)o+=i[0]+" ";}return o;};

Ungolfed

( l, t ) => {
   var h = System.DateTime.MinValue;
   var s = System.DateTime.ParseExact( t, "HH:mm", null );
   var o = "";

   foreach( var p in l.Split( '\n' ) ) {
      var i = p.Split( ' ' );

      h = h.Ticks < 1
         ? System.DateTime.ParseExact( i[ 1 ], "HH:mm", null )
         : h.AddMinutes( int.Parse( i[ 1 ] ) );

      if( h > s )
         o += i[ 0 ] + " ";
   }

   return o;
};

Ungolfed читаемый

( l, t ) => {
   // var to check the time of arrival
   var h = System.DateTime.MinValue;

   // var to store the start time of the party
   var s = System.DateTime.ParseExact( t, "HH:mm", null );

   // var with the names of those who arrived late
   var o = "";

   // Cycle through which line
   foreach( var p in l.Split( '\n' ) ) {
      // Split the name and time
      var i = p.Split( ' ' );

      // Check if the time of arrival still has the initial value
      h = h.Ticks < 1

         // If so, grab the time of the first person
         //   Expects to have a time format of 'hh:mm'
         ? System.DateTime.ParseExact( i[ 1 ], "HH:mm", null )

         // Otherwise, add the difference to the var
         : h.AddMinutes( int.Parse( i[ 1 ] ) );

      // Check if the current time is later than the party start time
      if( h > s )

         // If so, add the name to the list
         o += i[ 0 ] + " ";
   }

   // Return the names of the persons who arrived late
   return o;
};

Полный код

using System;
using System.Collections.Generic;

namespace Namespace {
   class Program {
      static void Main( String[] args ) {
         Func<String, String, String> f = ( l, t ) => {
            var h = System.DateTime.MinValue;
            var s = System.DateTime.ParseExact( t, "HH:mm", null );
            var o = "";

            foreach( var p in l.Split( '\n' ) ) {
               var i = p.Split( ' ' );

               h = h.Ticks < 1
                  ? System.DateTime.ParseExact( i[ 1 ], "HH:mm", null )
                  : h.AddMinutes( int.Parse( i[ 1 ] ) );

               if( h > s )
                  o += i[ 0 ] + " ";
            }

            return o;
         };

         List<KeyValuePair<String, String>>
            testCases = new List<KeyValuePair<String, String>> {
               new KeyValuePair<String, String>(
                  "Kevin 13:02\nRuby 5\nSam 3\nLisa 6\nBob 12",
                  "13:15"
               ),
               new KeyValuePair<String, String>(
                  "Kevin 13:15\nRuby 5\nSam 3\nLisa 6\nBob 12",
                  "13:15"
               ),
            };

         foreach( KeyValuePair<String, String> testCase in testCases ) {
            Console.WriteLine( $" Input:\n{testCase.Key}\n\n{testCase.Value}\n\nOutput:\n{f( testCase.Key, testCase.Value )}\n" );
         }

         Console.ReadLine();
      }
   }
}

релизы

  • v1.1 - - 2 bytes- Благодаря VisualMelon
  • v1.0 - 269 bytes- Исходное решение.

Примечания

  • Формат вывода: выводит имена, разделенные пробелами
auhmaan
источник
Вы можете сохранить несколько байтов, добавив using D=System.DateTime;директиву (не забудьте заменить vars!). Вы должны действительно предоставить типы для лямбда-параметров, чтобы сделать этот код полностью однозначным (т.е. (string l,string f)). Я также думаю, что есть небольшая ошибка, вам нужно, h>sа не h>=s(1 байт!) В соответствии с "(Любой, кто точно в срок, хорошо.)". Вы можете сделать h.Ticks<1? Вы можете найти Nullable DateTimeдешевле, чем использовать DateTime.Min, но я не проверил все последствия здесь. С предложением using также ==D.Minдолжно работать.
VisualMelon
Что касается использования, я сомневаюсь, что смогу извлечь из него лямбда-выражение. Я почти уверен, что не могу добавить это в середине кода . Явные лямбда-типы - это еще одна вещь, которую я не видел, чтобы люди делали это, и я согласился с этим - если это незаконно , скажем так, но даже моды ничего не сказали, может, все в порядке? h>sЯ сделаю это один. h.Ticks<1и этот тоже.
auhmaan
Я уверен, что мы разрешаем usingsи такое с лямбдами, я не могу найти что-либо, говорящее это явно на мета, но этот вопрос настоятельно предполагает, что это разрешено. Существует разумный консенсус в отношении необходимости явных типов параметров (я должен добавить, что я твердо поддерживаю). Кстати, Моды существуют для того, чтобы сохранять гражданскую позицию с точки зрения SE, а не для обеспечения соблюдения собственных правил PPCG.
VisualMelon
Я немного против usings, в основном потому, что я чувствую, что для этого потребуется полный код, поэтому я говорю, что сомневаюсь, что смогу реализовать функцию в качестве решения - возможно, добавив два блока, один для usings и другой для лямбда-функция? Что Func<...> f = ...;System.Func<...> f = ...;
касается
Возможно, вам лучше иметь хорошо названную функцию (добавляется только string sс синтаксисом C # 7 (6? Я не помню)), если вы не хотите смешивать лямбды и употребления.
VisualMelon
2

CJam , 43 41 байт

q~':/60b:Y;Sf/()':/60b+a\+{)iT+:TY>{;}|}%

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

объяснение

q~        e# Read and eval all input.

':/       e# Split the start time on colons.
60b       e# Convert the result from base 60, to get the start time in minutes.
:Y;       e# Store this time in variable Y, and discard it from the stack.

Sf/       e# Split each string in the guest list on spaces.
(         e# Pull out the first guest from the list.
)         e# Pull out the time from the guest.
':/60b+   e# Convert the time to a number of minutes (same way as before), then add it back
          e#   to the guest.
a\+       e# Add the guest back to the start of the guest list.

          e# At this point, the first guest has his/her arrival time in minutes, and everyone
          e#  else still has their original number.

{         e# Apply this block to each guest:
 )i       e#  Pull out the number and cast it to an integer.
 T+       e#  Add the value of variable T to it (T is initially 0).
 :T       e#  Store the result back into T.
 Y>{;}|   e#  If the resulting number of minutes is not after the start time, delete the 
          e#    guest's name.
}%        e# (end of block)

          e# Implicit output.
Бизнес Кот
источник
2

Луа, 211 206 байт

Первый кодгольф года для меня, все еще должен быть пригодным для игры в гольф.

Изменить: 5 байтов сохранены с помощью сокращения для string.match

function f(l,T)m=T.match
r=function(X)return
m(X,"^%d+")*3600+60*m(X,"%d+$")end
T=r(T)z={}y=0
for i=1,#l do
h=m(l[i],"%d.*")h=i>1 and y+h*60or r(h)y=h
z[#z+1]=h>T and m(l[i],"%u%l*")or nil
end return z end

Пояснения

function f(l,T)                         -- declare the function f(list,partyTime)
  r=function(X)                         -- declare a function r that convert hh:mm in seconds
    return X:match("^%d+")*3600         -- return the sum of seconds the hours
          +60*X:match("%d+$")           -- and in the seconds
  end                                   
  T=r(T)                                -- convert the partyTime in seconds
  z={}                                  -- create the shameList for late partygoers
  y=0                                   -- y will keep us updated on the second count
  for i=1,#l                            -- iterate over l
  do                                    
    h=l[i]:match("%d.*")                -- h is a shorthand for the time of arrival
    h=i>1                               -- if we're on the second line at least
        and y+h*60                      -- update h with the time of arrival in second
      or r(h)                           -- else use r()(for the first partygoer only)
    y=h                                 -- update our reference for adding time
    z[#z+1]=h>T                         -- if the last partygoer was late
                and l[i]:match("%u%l*") -- add its name to the shameList
              or nil                    -- else, don't do anything
  end                                   
  return z                              -- return the shameList
end                                 

если вы хотите попробовать этот код, вы можете использовать следующий фрагмент

function f(l,T)r=function(X)return
X:match("^%d+")*3600+60*X:match("%d+$")end
T=r(T)z={}y=0
for i=1,#l do
h=l[i]:match("%d.*")h=i>1 and y+h*60or r(h)y=h
z[#z+1]=h>T and l[i]:match("%u%l*")or nil
end return z end

retour = f({"Kevin 13:02","Ruby 5","Sam 3","Lisa 6","Bob 12"},"13:15")
for i=1,#retour
do
  print(retour[i])
end
Katenkyo
источник
2

Java, 346 304 284 275 байт

  • -9 байт, благодаря @KevinCruijssen
void g(int m,String[]n,String[]a,int M){for(int i=0;i<n.length;i++)if((M+=i>0?p(a[i]):0)>m)System.out.print(n[i]);}
int p(String n){return new Short(n);}
int h(String t){return p(t.split(":")[0])*60+p(t.split(":")[1]);}
void f(String[]n,String[]a,String b){g(h(b),n,a,h(a[0]));}

Подробный Live

public static void g(int m, String[] n, String[] a, int M)
{
    for(int i = 0; i < n.length; i++)
    {
        if((M += i>0 ? p(a[i]) : 0) > m)
        {
            System.out.println(n[i]);
        }
    } 
}

public static int p(String n)
{
    return Integer.parseInt(n);
}

public static int h(String t)
{
    return p(t.split(":")[0])*60+p(t.split(":")[1]);
}

public static void f(String[] n, String[] a, String b)
{
    g(h(b),n,a,h(a[0]));
}
Khaled.K
источник
1
Хороший гольф (для Java.) Вам нужно пространство между String[] n,и String[] a?
programmer5000
@ programmer5000 нет, я также удалил переменную часов и накапливал их в минутах.
Khaled.K
1
Вы можете заменить Integer.parseInt(n)на new Short(n). И основываясь на комментариях вызова, LisaBobтакже действительный выход, так что вы можете изменить printlnв print.
Кевин Круйссен
1

Пакетный, 163 байта

@set/pp=
@set/ap=%p::=*60+%
:l
@set g=
@set/pg=
@if "%g%"=="" exit/b
@set t=%g:* =%
@set/ap-=%t::=*60+%
@for %%g in (%g%)do @(if %p% lss 0 echo %%g)&goto l

Принимает участие в STDIN. Первая строка - время начала вечеринки, затем список гостей. Использует трюк @ Арно, чтобы преобразовать чч: мм в минуты.

Предпочтительный входной пакет для этого будет в виде последовательности параметров командной строки (начиная со времени вечеринки, затем каждого гостя и времени в качестве отдельных аргументов). Это займет всего 129 байт:

@set p=%1
@set/ap=%p::=*60+%
:l
@set t=%3
@set/ap-=%t::=*60+%
@if %p% lss 0 echo %2
@shift
@shift
@if not "%2"=="" goto l
Нил
источник
1

Groovy, 121 байт

{g,t->y={Date.parse('hh:mm',it)};u=y(t);d=y(g.remove(0)[1]);g.find{z=it[1];use(groovy.time.TimeCategory){d+z.minutes}>u}}
Урна волшебного осьминога
источник
1

PowerShell, 170 160 байт

select-string '(?m)^((\w*) )?((\d\d):)?(\d?\d)$'-a|% matches|%{,$_.groups[2,4,5].value}|%{}{$b+=($c=60*$_[1]+$_[2]);$a+=,@{n=$_[0];t=$b}}{$a|? n|? t -gt $c|% n}

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

Андрей Одегов
источник
Лучше поздно, чем никогда!
programmer5000
Я сегодня отдыхаю, поэтому немного
Андрей Одегов,