写出下面程序的功能

来源：百度知道 编辑：UC知道 时间：2024/05/30 01:06:32
clear
p=1
for i=1 to 5
if i％2=0 or i％3=0
loop
endif
p=p*i
endfor
?“p=”,p

条件循环：
clear：清屏；
p=1:p赋值为1；
for i=1 to 5:i赋值范围；
if i％2=0 or i％3=0
loop ：i在1～5范围内取值，如果i/2或i/3的余数为零，继续循环取值；
endif
p=p*i
endfor：取值后，如果p=p*i,结束循环；
?“p=”,p：这句可能是显示 p="p被赋予的值"。

什么语言写的，没见过

这难道是VF的程序？