Yukicoder No.504 ゲーム大会(ランキング)
tailsさんがperlで使っていた??
は?PATTERN?
の退化したものらしい: http://perldoc.perl.org/perlop.html#%3fPATTERN%3f。yukicoderはv5.16.3
だから使えるが、手元のv5.22.1
では削除されていて動かない。
implementation
bash $32$byte
awk 'NR>1,$0=r+=!!(a?a<$0:a=$0)'
元実装:
#include <stdio.h>
int main() {
int n; scanf("%d", &n);
int a; scanf("%d", &a); -- n;
int rank = 1;
printf("%d\n", rank);
while (n --) {
int b; scanf("%d", &b);
if (a < b) ++ rank;
printf("%d\n", rank);
}
return 0;
}