結果

問題 No.662 スロットマシーン
コンテスト
ユーザー te-sh
提出日時 2018-04-05 15:21:25
言語 D
(dmd 2.109.1)
結果
AC  
実行時間 5 ms / 2,000 ms
コード長 1,089 bytes
コンパイル時間 2,550 ms
コンパイル使用メモリ 155,756 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-06-13 00:17:21
合計ジャッジ時間 3,165 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge4
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 19
権限があれば一括ダウンロードができます

ソースコード

diff # 

import std.algorithm, std.conv, std.range, std.stdio, std.string;

void readV(T...)(ref T t){auto r=readln.splitter;foreach(ref v;t){v=r.front.to!(typeof(v));r.popFront;}}
void readA(T)(size_t n,ref T t){t=new T(n);auto r=readln.splitter;foreach(ref v;t){v=r.front.to!(ElementType!T);r.popFront;}}
void readM(T...)(size_t n,ref T t){foreach(ref v;t)v=new typeof(v)(n);foreach(i;0..n){auto r=readln.splitter;foreach(ref v;t){v[i]=r.front.to!(ElementType!(typeof(v)));r.popFront;}}}
void readS(T)(size_t n,ref T t){t=new T(n);foreach(ref v;t){auto r=readln.splitter;foreach(ref j;v.tupleof){j=r.front.to!(typeof(j));r.popFront;}}}

void main()
{
  int m = 5, k = 3;
  string[] s; int[] c; readM(m, s, c);
  auto n = new long[](k), a = new string[][](k);
  foreach (i; 0..k) {
    readV(n[i]);
    readM(n[i], a[i]);
  }

  auto u = new long[](m);
  foreach (i; 0..m) {
    auto t = a.map!(ai => ai.count(s[i]));
    u[i] = t.fold!"a*b";
  }
  u[] *= 5;

  auto v = 0.0L;
  foreach (i; 0..m) v += c[i].to!real * u[i];

  writefln("%.2f", v/n.fold!"a*b");
  foreach (i; 0..m) writeln(u[i]);
}
0