Submission #3102390


Source Code Expand

Copy
var
 a,b,c,d,n,k:longint;
begin
 readln(a,b,c,d);
 readln(n);
 k:=a*4;
 if k>b*2 then k:=b*2;
 if k>c then k:=c;
 if k*2<d then
 writeln(n*k)
 else
 writeln((n mod 2)*k+(n div 2)*d);
end.

Submission Info

Submission Time
Task A - Ice Tea Store
User luogu_bot5
Language Pascal (FPC 2.6.2)
Score 300
Code Size 187 Byte
Status
Exec Time 0 ms
Memory 128 KB

Compile Error

/usr/bin/ld.bfd: warning: ./link.res contains output sections; did you forget -T?

Judge Result

Set Name Score / Max Score Test Cases
Sample 0 / 0 sample_01.txt, sample_02.txt, sample_03.txt, sample_04.txt
All 300 / 300 sample_01.txt, sample_02.txt, sample_03.txt, sample_04.txt, sample_01.txt, sample_02.txt, sample_03.txt, sample_04.txt, subtask_1_01.txt, subtask_1_02.txt, subtask_1_03.txt, subtask_1_04.txt, subtask_1_05.txt, subtask_1_06.txt, subtask_1_07.txt, subtask_1_08.txt, subtask_1_09.txt, subtask_1_10.txt, subtask_1_11.txt, subtask_1_12.txt, subtask_1_13.txt, subtask_1_14.txt, subtask_1_15.txt
Case Name Status Exec Time Memory
sample_01.txt 0 ms 128 KB
sample_02.txt 0 ms 128 KB
sample_03.txt 0 ms 128 KB
sample_04.txt 0 ms 128 KB
subtask_1_01.txt 0 ms 128 KB
subtask_1_02.txt 0 ms 128 KB
subtask_1_03.txt 0 ms 128 KB
subtask_1_04.txt 0 ms 128 KB
subtask_1_05.txt 0 ms 128 KB
subtask_1_06.txt 0 ms 128 KB
subtask_1_07.txt 0 ms 128 KB
subtask_1_08.txt 0 ms 128 KB
subtask_1_09.txt 0 ms 128 KB
subtask_1_10.txt 0 ms 128 KB
subtask_1_11.txt 0 ms 128 KB
subtask_1_12.txt 0 ms 128 KB
subtask_1_13.txt 0 ms 128 KB
subtask_1_14.txt 0 ms 128 KB
subtask_1_15.txt 0 ms 128 KB