過去ログ

???
vbscript
n1=0:n2=0
while n2<100
n1=n1+1:n2=n2+1
while n2 mod 10=4 or n2 mod 10=9 or n2\10=4 or n2\10=9
n2=n2+1
wend
if 10<=n1 and n2<=99 then
if n1 mod 10=n2\10 and n1\10=n2 mod 10 then
msgbox n1&","&n2
end if
end if
wend
   10月10日(木) 9:31:02     41002

過去問題一覧へ戻る