Submission #9355493


Source Code Expand

Copy
NR==1 {
  n = $1
}
NR==2 {
  for (i=1;i<=n;++i) a[i] = $i
}
NR==3 {
  for (i=1;i<=n;++i) ans += $i
}
NR==4 {
  for (i=1;i<n;++i) c[i] = $i
}
END {
  for (i=1;i<n;++i) if (a[i] + 1 == a[i + 1]) ans += c[a[i]];
  print ans
}

Submission Info

Submission Time
Task B - Buffet
User cympfh
Language Awk (mawk 1.3.3)
Score 200
Code Size 239 Byte
Status
Exec Time 1 ms
Memory 256 KB

Judge Result

Set Name Score / Max Score Test Cases
All 200 / 200 sample_01, sample_02, sample_03, testcase_01, testcase_02, testcase_03, testcase_04, testcase_05, testcase_06, testcase_07, testcase_08, testcase_09, testcase_10
Sample 0 / 0 sample_01, sample_02, sample_03
Case Name Status Exec Time Memory
sample_01 1 ms 256 KB
sample_02 1 ms 256 KB
sample_03 1 ms 256 KB
testcase_01 1 ms 256 KB
testcase_02 1 ms 256 KB
testcase_03 1 ms 256 KB
testcase_04 1 ms 256 KB
testcase_05 1 ms 256 KB
testcase_06 1 ms 256 KB
testcase_07 1 ms 256 KB
testcase_08 1 ms 256 KB
testcase_09 1 ms 256 KB
testcase_10 1 ms 256 KB