結果

問題 No.722 100×100=1000
コンテスト
ユーザー varrho
提出日時 2019-09-23 17:49:30
言語 Nim
(2.2.0)
結果
AC  
実行時間 2 ms / 2,000 ms
コード長 424 bytes
コンパイル時間 4,926 ms
コンパイル使用メモリ 65,408 KB
実行使用メモリ 5,248 KB
最終ジャッジ日時 2024-12-29 19:48:09
合計ジャッジ時間 5,676 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge5
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 27
権限があれば一括ダウンロードができます

ソースコード

diff # 

import math, sequtils, strutils
let
  a: seq[int] = stdin.readline.split.map(parseInt)
  b: seq[string] = @[$(abs(a[0])), $(abs(a[1]))]
  c: seq[int] = @[b[0].count('0'), b[1].count('0')]
var
  prod: int = a[0] * a[1]
  ans: string
if b[0].len == c[0] + 1 and c[0] > 1 and b[1].len == c[1] + 1 and c[1] > 1:
  prod = prod div 10
  ans = $(prod)
else:
  if abs(prod) >= 10 ^ 8:
    ans ="E"
  else:
    ans = $(prod)
echo ans
0