###GolfScript, (削除) 112 (削除ここまで) 105 characters###
GolfScript, (削除) 112 (削除ここまで) 105 characters
3,21*{..+6rand<3*+)}%3/\{)\.+-1%>2<.p~<}+,,"User
Computer"n/111ドル<=" wins with "+\[.~22+]1ドル>~+" points"+
Run it online.
The script expects the input on STDIN and then prints the outcome of the dice rolls (first column computer, second user) and the final statistics to STDOUT.
###GolfScript, (削除) 112 (削除ここまで) 105 characters###
3,21*{..+6rand<3*+)}%3/\{)\.+-1%>2<.p~<}+,,"User
Computer"n/111ドル<=" wins with "+\[.~22+]1ドル>~+" points"+
Run it online.
The script expects the input on STDIN and then prints the outcome of the dice rolls (first column computer, second user) and the final statistics to STDOUT.
GolfScript, (削除) 112 (削除ここまで) 105 characters
3,21*{..+6rand<3*+)}%3/\{)\.+-1%>2<.p~<}+,,"User
Computer"n/111ドル<=" wins with "+\[.~22+]1ドル>~+" points"+
Run it online.
The script expects the input on STDIN and then prints the outcome of the dice rolls (first column computer, second user) and the final statistics to STDOUT.
###GolfScript, 112(削除) 112 (削除ここまで) 105 characters###
~~5+.{3,21*{6rand\.(.+@<3*+}+[21*]}:c~3円%+6rand<3*+)c]zip}%3/\{)\.p~>+-1%>2<.p~<}+,,"User
Computer"n/111ドル<=" wins with "+\[.~22+]1ドル>~+" points"+
The script expects the input on STDIN and then prints the outcome of the dice rolls (first column usercomputer, second computeruser) and the final statistics to STDOUT.
###GolfScript, 112 characters###
~~5+.{{6rand\.(.+@<3*+}+[21*]}:c~3円%)c]zip{.p~>},,"User
Computer"n/111ドル<=" wins with "+\[.~22+]1ドル>~+" points"+
Run it online.
The script expects the input on STDIN and then prints the outcome of the dice rolls (first column user, second computer) and the final statistics to STDOUT.
###GolfScript, (削除) 112 (削除ここまで) 105 characters###
3,21*{..+6rand<3*+)}%3/\{)\.+-1%>2<.p~<}+,,"User
Computer"n/111ドル<=" wins with "+\[.~22+]1ドル>~+" points"+
Run it online.
The script expects the input on STDIN and then prints the outcome of the dice rolls (first column computer, second user) and the final statistics to STDOUT.
###GolfScript, 112 characters###
~~5+.{{6rand\.(.+@<3*+}+[21*]}:c~3円%)c]zip{.p~>},,"User
Computer"n/111ドル<=" wins with "+\[.~22+]1ドル>~+" points"+
Run it online.
The script expects the input on STDIN and then prints the outcome of the dice rolls (first column user, second computer) and the final statistics to STDOUT.