結果
問題 | No.81 すべて足すだけの簡単なお仕事です。 |
ユーザー |
![]() |
提出日時 | 2018-07-04 19:15:29 |
言語 | Lua (LuaJit 2.1.1734355927) |
結果 |
WA
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 1,178 bytes |
コンパイル時間 | 93 ms |
コンパイル使用メモリ | 6,692 KB |
実行使用メモリ | 6,820 KB |
最終ジャッジ日時 | 2024-10-13 10:13:39 |
合計ジャッジ時間 | 952 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 24 WA * 6 |
ソースコード
print((function (f1, f2, f3, g)local i,f=g()if (f>=1e10 and i>=0) or (f<=-1e10 and i<0) then return f1(i,f) endif f>=1e10 or f<=-1e10 then return f2(i,f) endreturn f3(i,f)end)(function (i, f)local s=tostring(f)return tostring(i+tonumber(s:sub(1,#s-10))).."."..s:sub(#s-9)end, function (i, f)local s=tostring(f)local a,b=tonumber(s:sub(1,#s-10)),tonumber(s:sub(#s-9))if b==0 then return tostring(i+a)..".0000000000" enda,b = tostring(i+(a>0 and a+1 or a-1)),tostring(math.abs(tonumber(s:sub(#s-9))-1e10))return a.."."..string.rep("0",10-#b)..bend, function (i, f)if f==0 then return tostring(i)..".0000000000" endif i==0 then return f>0 and "0."..tostring(f) or "-0."..tostring(f):sub(2) endif f>0 and i<0 then i,f = i+1,math.abs(f-1e10) endif f<0 and i>0 then i,f = i-1,math.abs(f+1e10) endlocal s=tostring(f)return tostring(i).."."..string.rep("0",10-#s)..send, function ()local i,f=0,0for _=1,tonumber(io.stdin:read("*l")) dolocal a,b,c = io.stdin:read("*l"):match("(%-?)(%d+)%.?(%d*)")b,c = tonumber(b),(#c~=0 and tonumber(c..string.rep("0",10-#c)) or 0)if a=="" then i,f=i+b,f+c else i,f=i-b,f-c endendreturn i,fend))