結果

問題 No.188 HAPPY DAY
コンテスト
ユーザー nobigomu
提出日時 2018-03-02 14:16:07
言語 Lua
(LuaJit 2.1.1774638290)
コンパイル:
luajit -b _filename_ a.out
実行:
luajit _filename_
結果
AC  
実行時間 2 ms / 1,000 ms
コード長 516 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 159 ms
コンパイル使用メモリ 6,528 KB
実行使用メモリ 6,400 KB
最終ジャッジ日時 2026-06-06 09:06:30
合計ジャッジ時間 1,097 ms
ジャッジサーバーID
（参考情報） 		judge1_0 / judge2_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 1
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

local calc = (function ()
	local t = {}
	return function (n)
		if t[n] ~= nil then
			return t[n]
		else
			local s = tostring(n)
			local r = tonumber(s:sub(1,1))
			if s:sub(2,2) ~= "" then
				r = r + tonumber(s:sub(2,2))
			end
			t[n] = r
			return r
		end
	end
end)()

function count(m, d, r)
	if d > 0 then
		return count(m, d-1, m == calc(d) and r+1 or r)
	end
	return r
end

local t = {31; 28; 31; 30; 31; 30; 31; 31; 30; 31; 30; 31}
local r = 0
for i,v in ipairs(t) do
	r = r + count(i, v, 0)
end
print(r)
0