過去ログ

???

VBSCRIPT
deta=0:k=2
while deta=0
a=31*k-41
if ((a+2) mod 5)+((a+7) mod 13)=0 then
deta=1:msgbox a
else
k=k+1
end if
wend

　　 1月8日（木） 10:12:28　　　　42808