Святковий головний біль


14

Попередження: НЕ прийміть медичну консультацію з цієї посади. Якщо ви хочете отримати медичну консультацію, зверніться до кваліфікованого фахівця.

В мене головний біль. Мені потрібні таблетки від головного болю.

Я скажу вам останні кілька доз, які ви вживали, і ви скажете мені, коли я можу отримати наступну дозу, без передозування.

Я дам вам цей рядок: P: 00:00, I: 02:00, P: 04:00, I: 06:00

І ти мені це дасиш: Next P: 08:00, I: 10:00

Вхід:

Рядок, що відображає час прийому кожного препарату, у такому форматі:

P: 00:00, I: 02:00, P: 04:00, I: 06:00

Це означає, що парацетамол приймали о 00:00 та 04:00, а Ібупрофен приймали о 02:00 та 06:00

Вихід (оновлено):

Рядок із часом прийому наступних препаратів кожного препарату у такому форматі:

Next P: 08:00, I: 10:00
  • Порядок виходу повинен бути у тому порядку, який слід приймати ліки. - Якщо Ібупрофен приймати о 09:35, а Парацетамол та 10:22, то вихід повинен бутиNext I: 09:35, P: 10:22
  • Якщо час для наступної дози кожного препарату однаковий, порядок виходу не має значення: Next P: 08:00, I: 08:00АБОNext I: 08:00, P: 08:00
  • Якщо приймається лише одне ліки (у вхідному рядку), то лише цей препарат повинен бути у вихідному рядку: Next P: 02:00

Правила:

  • Будуть існувати лише два типи ліків: Парацетамол «Р» та Ібупрофен «Я».
  • Парацетамол можна приймати один раз кожні 4 години, максимум 4 рази протягом 24 годин.
  • Ібупрофен також можна приймати раз на 4 години, максимум 4 рази протягом 24 годин.
  • Парацетамол та Ібупрофен можна приймати разом або в окремий час. Один не рахується з дозуванням іншого.
  • Часи у вхідному рядку завжди будуть послідовними, але можуть пропадати протягом півночі (23:00 -> 03:00)
  • Час у вхідному рядку не буде тривати більше 24 годин
  • Максимум 4 рази на кожен препарат (8 макс. Усього)
  • Введення завжди буде не порожнім і міститиме принаймні одне ліки та один раз

Приклади:

Дві дози кожної з інтервалом у дві години:

"P: 00:00, I: 02:00, P: 04:00, I: 06:00" -> "Next P: 08:00, I: 10:00"

Разова доза Парацетамолу

"P: 22:00" -> "Next P: 02:00"

Максимальна доза парацетамолу протягом 24 годин, разова доза Ібупрофену

"P: 04:05, P: 08:10, P: 12:15, I: 12:30, P: 16:25" -> "Next I: 16:30, P: 04:05"

Тестові приклади:

"I: 06:00" -> "Next I: 10:00"
"P: 22:00" -> "Next P: 02:00"
"P: 22:00, P: 02:00, I: 06:00" -> "Next P: 06:00, I: 10:00"
"P: 00:00, I: 02:00, P: 04:00, I: 06:00" -> "Next P: 08:00, I: 10:00"
"P: 04:05, P: 08:10, P: 12:15, I: 12:30, P: 16:25" -> "Next I: 16:30, P: 04:05"
"I: 06:32, P: 08:15, I: 10:44, P: 13:03" -> "Next I: 14:44, P: 17:03"
"P: 07:30, I: 07:30, P: 11:30, I: 11:30, P: 15:30, I: 15:30, I: 19:30" -> "Next P: 19:30, I: 07:30"
"I: 07:30, P: 11:30, I: 11:30, P: 15:30, I: 15:30, P: 19:30, I: 19:30" -> "Next P: 23:30, I: 07:30"
"P: 07:30, I: 07:30, P: 11:30, I: 11:30, P: 15:30, I: 15:30, P: 19:30, I: 19:30" -> "Next P: 07:30, I: 07:30" OR "Next I: 07:30, P: 07:30"

Це кодовий гольф, тому найкоротша відповідь int bytes виграє.

ОНОВЛЕННЯ:

Вихід тепер може бути абревіатурами Парацетамолу та Ібупрофену; PіI


Я б непогано мати деякі важелі впливу на формат введення і виведення - мета пост
Gurupad Mamadapur

Можливо вихід @GurupadMamadapur, але вилучення часу та типу ліків із половини виклику
Ерресен

Я рекомендую вам дозволити людям скорочувати парацетамол та ібупрофен у випуску, оскільки вони додають непотрібної тривалості поданням
Cyoce

@Cyoce Так, я згоден, намагаюся вирішити сам, і це насправді трохи хитро - оновлено правила, щоб дозволити скорочений вихід
Erresen

@Lynn погодився та оновлено
Erresen

Відповіді:


4

JavaScript (ES6), 367 362 354 358 байт

Версія для гольфу:

A=i=>i>9?""+i:"0"+i,B=(s,a=":")=>s.split(a),C=(a,b,c,d)=>[...[s,t]=B((b>3?c:d)||":"),a+` ${A(s=b>3?+s:(+s+4)%24)}:`+A(t=+t)],F=s=>{a=B(s,m=", ");for(b=c=d=e=f=p=q=0;f<a.length;g=="P:"?(b++,d=d?h:p=h):(c++,e=e?h:q=h))[g,h]=B(a[f++]," ");[i,j,k]=C("P",b,p,d),[n,o,l]=C("I",c,q,e),r=B(h)[0];return"Next "+c?b?n*60+(n<r)*1440+j<i*60+(i<r)*1440+o?l+m+k:k+m+l:l:k}

Безголів / прокоментував:

// Returns a zero-padded string of the argument.
A=i=>i>9?""+i:"0"+i,

// Since we do a lot of splitting, alias it. Making the
// second argument optional (and defaulting to ':') saved
// 3 bytes
B=(s,a=":")=>s.split(a),

// Constructs a string for output, along with the time
// of the next dose, in the format [hour, minute, string].
// Arguments:               type
// a -> type (P/I)          String
// b -> amount of doses     Number
//      taken
// c -> first dose taken    String
// d -> last dose taken     String
//
// The first two values are split from the string, but
// before the array is returned, they are converted to
// integers (during the string construction).
C=(a,b,c,d)=>[...[s,t]=B((b>3?c:d)||":"),a+` ${A(s=b>3?+s:(+s+4)%24)}:`+A(t=+t)],

// Main function. Returns the time(s) for the next dose.
// Argument:                type
// s -> list of times of    String
//      and types of 
//      doses taken
F=s=>{
    a=B(s,m=", "); // Split the input by comma + space,
                   // and save that string, since we
                   // need it later when constructing
                   // the output string.
    // For loop has been restructured. Original:
    // for(b=c=f=0;f<a.length;g=="P:"?(b++,d=d?h:p=h):(c++,e=e?h:q=h))
    //     [g,h]=B(a[f++]," ");
    b = 0; // P-dose counter
    c = 0; // I-dose counter
    d = 0; // Last P-dose
    e = 0; // Last I-dose
    p = 0; // First P-dose
    q = 0; // First I-dose
    for (f = 0; f < a.length; f++) {
        [g, h] = B(a[f], " ");  // g contains the type,
                                // h contains the time
        if (g == "P:") {
            b++;                // increase the counter

            if (d == 0) {   // store h in p if this is
                p = h;      // the first dose of this
            }               // type
            d = h;
        } else {
            // See the above code block for comments
            c++;

            if (e == 0) {
                q = h;
            }
            e = h;
        }
    }
    // End of restructured for loop.

    // Construct the output strings, and get the times.
    // See comments at C function.
    [i, j, k] = C("P", b, p, d);
    [n, o, l] = C("I", c, q, e);

    // Get the amount of hours of the dose taken last.
    // We use this to get the correct order of the two
    // times.
    r = B(h)[0];

    // Return statement has been restructured. Original:
    // return "Next "+c?b?n*60+(n<r)*1440+j<i*60+(i<r)*1440+o?l+m+k:k+m+l:l:k
    //==================================================
    // Start creating the output string.
    output = "Next "
    // Use the following checks to figure out what needs
    // to be part of the output and in what order.
    if (c > 0) {
        if (b > 0) {
            // Compare the times of next doses
            // P_time = (i + (i < r) * 24) * 60
            // I'm using implicit conversion of
            // booleans to numbers. If the next
            // dose is past midnight, add 1 * 24
            // to the time, so it is compared
            // correctly.
            // Then add the minutes to the number.
            P_time = i*60+(i<r)*1440+o;
            I_time = n*60+(n<r)*1440+j;

            if (I_time < P_time) {
                output += l + m + k; // I first
            } else {
                output += k + m + l; // P first
            }
        } else {
            output += l; // Just I
        }
    } else {
        output += k; // Just P
    }

    // Finally, return the output
    return output;
}

Щоб скористатися нею, зателефонуйте на F за допомогою рядка як такого аргументу:

F("P: 04:00, I: 06:00")

Це чудово, але у мене було пару проблем. Здається, це не виходить, якщо на вході є лише один тип таблетки, наприклад F("P: 22:00")-> ReferenceError: q is not defined. Цей вклад буде запущений, якщо про P&I було зазначено раніше, але зі старими деталями для мене.
Chris M

Спасибі! Я просто перевірив це, і ти маєш рацію щодо помилки посилання. Я думаю, що змінна q не скидається, і я не приділяв достатньої уваги під час тестування. Дякуємо, що повідомили мені, що я виправлю це пізніше.
Лука

Виявилося легко, але це коштувало мені 4 байти.
Лука

1

Python 3 - 437 байт

a=input();i=p=l=-1;j=q=0
for x in a.split(", ")[::-1]:
    for y, z in [x.split(": ")]:
        s=lambda q,r,t:[t,sum([a*b for a,b in zip([60,1],map(int,q.split(':')))])][r%4<2]+[0,240][r<2]
        if y=="I":j+=1;i=s(z,j,i)
        else:q+=1;p=s(z,q,p)
        l=[l,p+i-239][j+q<2]
r=lambda d,e:("","%s: %02d:%02d, "%(d,(e/60)%24,e%60))[e>-1];p+=[1440,0][p>=l];i+=[1440,0][i>=l];print("Next "+[r("I",i)+r("P",p),r("P",p)+r("I",i)][p<i][:-2])

Пояснення:

a=input();i=p=l=-1;j=q=0
for x in a.split(", ")[::-1]: #Read in reverse order, a="P: 01:00"
    for y, z in [x.split(": ")]:#Y="P", Z="00:00"
        s=
        lambda q,r,t:[t,sum([a*b for a,b in zip([60,1],map(int,q.split(':')))])]#Convert "01:01" to 61
        [r%4<2]#In case it's the first or fourth string calculate a new value, otherwise: return the original value
        +[0,240][r<2]#In case it's the last string: add 4 hours. Otherwise, leave it.
        if y=="I":j+=1;i=s(z,j,i)#Calculate for i
        else:q+=1;p=s(z,q,p)#Calculate for p
        l=[l,p+i-239][j+q<2]#Sets the last record. Since we read in reverse order, this should be the first one. We've added 4 hours though so remove those again
r=lambda d,e:("","%s: %02d:%02d, "%(d,(e/60)%24,e%60))[e>-1];#Print function, don't print anything when we have no value
p+=[1440,0][p>=l];i+=[1440,0][i>=l];    #Add a day if record is before the last record so we can correctly calculate the order
print("Next "+[r("I",i)+r("P",p),r("P",p)+r("I",i)][p<i][:-2])#print it and remove the last ","

1

PHP, 228 241 239 227 226 байт

вимагає PHP 7

Next<?foreach(explode(", ",$argv[1])as$d){[$m,$h,$i]=explode(":",$d);$x[$m][++$$m]=24+$h+$i/60;}foreach($x as$m=>$d)$r[$m]=$d[$$m-3]?:$d[$$m]-20;sort($r);foreach($r as$m=>$t)$o[]=" $m: ".date("i:s",$t%24*60);echo join(",",$o);

зламатися

Next<?                              // print "Next"
foreach(explode(", ",$argv[1])as$d) // loop through string split by comma+space
{
    [$m,$h,$i]=explode(":",$d);         // separate drug, hours and minutes
    $x[$m][++$$m]=24+$h+$i/60;          // append time to array, track count in ${$m}
}                                       // (i.e. $P for drug "P" etc.)
foreach($x as$m=>$d)                // loop through drugs
    $r[$m]=                             // add time to result
        $d[$$m-3]                           // if more than 3 medications, use $$m-3
            ??$d[$$m]-20                    // else use last medication - 20 hours
    ;
sort($r);                           // sort results by time
foreach($r as$m=>$t)$o[]=" $m: "    // prepare for output: drug name and formatted time:
    .date("i:s",$t%24*60)           // use hrs as mins and mins as secs to avoid TZ problems
;
echo join(",",$o);                  // print

0

JavaScript (ES6), 246 байт

s=>s.split`, `.map(s=>(m[s[0]].unshift(t=s.replace(/\d+/,h=>(h=(1+h)%24)>9?h:`0`+h),s),l=l||t.slice(1)),l=0,m={I:[],P:[]})&&`Next `+[].concat(m.I[7]||m.I[0]||[],m.P[7]||m.P[0]||[]).sort((i,p)=>((i=i.slice(1))<l)-((p=p.slice(1))<l)||i>p).join`, `

Пояснення:

Циклічне над кожною дозою, як Iі Pдози розділені на два масиви. До кожної дози додається також 4 години, і ці часи також заощаджуються. Масиви заповнюються в зворотному напрямку, щоб полегшити виявлення 8 записів. Час через 4 години після першої дози також зберігається для використання під час сортування. На даний момент кожен масив може знаходитися в одному з трьох станів:

  • 8 записів, в цьому випадку останній прийом - перша доза, а наступна доза повинна бути через 24 години після цієї дози (тобто той же час завтра)
  • 2, 4 або 6 записів, у цьому випадку перший прийом через 4 години після останньої дози, а отже, час наступної дози
  • 0 записів, в цьому випадку ми конкатентатуємо [], що вирівнюється і тому виключається з результату

Витягнувши наступні рази дози з двох масивів, залишається сортувати їх у порядку. Це робиться шляхом порівняння їх із часом через 4 години після першої дози. Якщо один із двох разів перебуває до цього часу, це має стосуватися завтра, і ця доза настає останньою. Інакше часи просто порівнюються безпосередньо. (Швидше незручно, ліки є раніше часу, тому мені доведеться зняти його для порівняння належним чином.)

Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.