結果

問題 No.8117 Simple Programming Language
ユーザー jastaway
提出日時 2025-04-01 22:45:51
言語 Text
(cat 8.3)
結果
AC  
実行時間 1 ms / 1,000 ms
コード長 316 bytes
コンパイル時間 41 ms
コンパイル使用メモリ 7,452 KB
実行使用メモリ 7,328 KB
最終ジャッジ日時 2025-04-01 22:45:55
合計ジャッジ時間 3,198 ms
ジャッジサーバーID
(参考情報)
judge1 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
other AC * 15
権限があれば一括ダウンロードができます

ソースコード

diff #

$0 = 0
$1 = 0
$2 = 0
$5 = 0
while($0 < H*W)
    $3 = $0/W + 1
    $4 = $0%W + 1
    $5 = $5 + (A[$3,$4] - B[$3,$4])
    $0 = $0 + 1
end
$0 = 0
while($0 < H*W)
    $3 = $0/W + 1
    $4 = $0%W + 1
    $1 = $1 + ((A[$3,$4] - B[$3,$4])*$3)/$5
    $2 = $2 + ((A[$3,$4] - B[$3,$4])*$4)/$5
    $0 = $0 + 1
end
return($1,$2)
0