判断是否4的倍数并且显示输入这个数前是4的倍数的数

判断是不是4的倍数并且显示输入这个数前是4的倍数的数？
判断是不是4的倍数并且显示输入这个数前是4的倍数的数？ 比如我输入的是20 则显示 20是4的倍数 在20以内是4的倍数的数是 4 ，8，12，16，20 假如输入的是21则显示21不是4的倍数，在21以内是5的倍数的数是 4 ，8，12，16，20 依次这个样大家帮帮忙

------解决方案--------------------
asp的

VBScript code

<%
a=request(a)
c=a mod 4 '求余
d= a / 4 '求商
if c=0 then
response.write a & "是4的倍数<br>"
else
response.write a & "不是4的倍数<br>"
end if
response.write a & "以内是4的倍数<br>"
for i=1 to d
response.write (i*4) &" <br>"
next
%>