VF的几道简单题~答对了还有加分~
\u6025!!VF\u7684\u9898 \u5f88\u7b80\u5355 \u5728\u7ebf\u7b49 \u8c22\u8c221\u3001sele * from \u5b66\u751f
2\u3001sele \u59d3\u540d,\u5165\u5b66\u6210\u7ee9 from \u5b66\u751f
3\u3001sele \u6027\u522b,avg(\u5165\u5b66\u6210\u7ee9) as \u5e73\u5747\u6210\u7ee9 from \u5b66\u751f where \u6027\u522b="\u5973"
4\u3001sele * from \u5b66\u751f where \u6027\u522b="\u7537" and \u5165\u5b66\u6210\u7ee9>600
5\u3001
delete from \u5b66\u751f where recno()=15
pack
\u6e05\u7a7a\u5217\u8868\u3002
第一题：set talk off
clear
for i= 100 to 2000
a=int(i/1000)
b=int((i-a*1000)/100)
c=int((i-a*1000-b*100)/10)
d=mod(i,10)
if a^3+b^3+c^3+d^3=i
? i
endif
next
set talk on
第2题：
set talk off
s1=0
for i= 1000 to 9999 step 2
a=int(i/1000)
b=int((i-a*1000)/100)
c=int((i-a*1000-b*100)/10)
d=mod(i,10)
if mod(a+b+c+d,15)=0
s1=s1+i
endif
next
?"和为:",s1
set talk on
第3题：
set talk off
s2=100
j=1
for i=1 to 100
h=(3/4)^i*100
s2=s2+2*h
j=j+1
if s2>678
exit
endif
endfor
? "第",j,"次"
set talk on
第4题：
set talk off
n=0
for x=10 to 100
if mod(x,7)=0 and mod (x,9)=0 第一个错误 and 因该是 or
n=n+x 第二个错误应该是n=n+1
end if
end for
?x 第三个错误应该是：? n
set talk on
第五题：
set talk off
clear
s=1 第一个错误，应该是s=0
for n=1 to 50000 step 3
s=s+1 第二个错误，应该是s=s+n
if s>50000
loop 第三个错误因该是：exit
end if 第四个错误因该是：endif
eng do 第五个错误 因该是:endfor
?n
set talk on
return
第六题：
6、
set talk on
max=0
for n=100 to 300
s=0
__________
for i=1to n
if mod(n,i)=0
_______
s=s+1
endif
endfor
if mod (n,s)=0
max=n
____________
第7题：
set talk on
n=0
for x=1 to 39
y'=(200-5*x)/3
__________
y=int(y')
if y=y'
n=n+1
_________
end if
end for
第一题
FOR i = 100 TO 2000
cl = len(alltrim(str(i))
t = 0
FOR j = 1 TO cl
t = t + VAL(SUBSTR(ALLTRIM(STR(i)),j,1))^3
ENDFOR
IF t = i
? i
ENDIF
ENDFOR
第二题
sum0 = 0
FOR i = 1000 TO 9998 STEP 2
t = 0
FOR j = 1 TO 4
t = t + VAL(SUBSTR(ALLTRIM(STR(i)),j,1))
ENDFOR
IF t % 15 = 0
sum0 = sum0 + t
ENDIF
ENDFOR
?sum0
第三题
h = 100
t = h
n = 1
DO WHILE .t.
IF t > 678
? n
EXIT
ENDIF
n = n + 1
h = 0.75 * h
t = t + 2 * h
ENDDO
第四题
n = 0 && n需赋初始值
for x=10 to 100
if mod(x,7)=0 or mod (x,9)=0 && 逻辑关系错
n=n+1 && 计数错
end if
end for
?n && 输出错
第五题
set talk off
clear
s=0 && 初始值错
for n=1 to 50000 step 3
s=s+n && 求和错
if s>50000
exit && 应为退出，不是循环
endif && endif中间不能空格
endfor && for循环结束应为endfor
?n
set talk on
return
第六题
看不明白题目：“以知24有8个正整数。。。”
第七题：(此题内容已经补充，但VFP中用y'做变量是不允许的，建议改为其它名字)
set talk on
n=0
for x=1 to 39
y' = 200 - 5 * x
y=int(y')
if y=y'
n = n + 1
endif
endfor
晕哦~~
别人发题目来,你不会就不要在那乱叫.....
无聊的人,浪费空间~~~
绛旓細clear for i= 100 to 2000 a=int(i/1000)b=int((i-a*1000)/100)c=int((i-a*1000-b*100)/10)d=mod(i,10)if a^3+b^3+c^3+d^3=i ? i endif next set talk on 绗2棰橈細set talk off s1=0 for i= 1000 to 9999 step 2 a=int(i/1000)b=int((i-a*1000)/100)c=...
绛旓細READ 婵娲籊ET璇彞,骞舵鏄帴鍙楀湪GET璇彞涓緭鍏ョ殑鏁版嵁 RECALL 鎭㈠鐢―ELETE鍔犱笂鍒犻櫎鏍囪鐨勮褰 REINDEX 閲嶆柊寤虹珛姝ｅ湪浣跨敤鐨勫師鏈夌储寮曟枃浠 RELEASE 娓呮褰撳墠鍐呭瓨鍙橀噺鍜屾眹缂栬瑷瀛愮▼搴 RENAME 淇敼鏂囦欢鍚 REPLACE 鐢ㄦ寚瀹氱殑鏁版嵁鏇挎崲鏁版嵁搴撳瓧娈典腑鍘熸湁鐨勫唴瀹 REPORT FORM 鏄剧ず鏁版嵁鎶ヨ〃 RESTORE FROM 浠庡唴瀛樺彉閲忔枃浠(.ME...
绛旓細鏈鍚庡皯浜嗕釜endif
绛旓細鎴戝悜澶у鎺ㄨ崘涓涓滈泦鎴愬涔犵幆澧(C璇█)鈥,閲岃竟鐨勭煡璇嗙偣鎬荤粨鍜屼緥绋嬭瑙ｉ兘闈炲父濂,杩樻湁棰搴撴祴璇曠幆澧,鎹鏈夊ソ鍑犲崈棰,鐢氳嚦杩樻湁涓涓獁indows涓嬬殑trubo C,鍒濆鑰呯敋鑷充笉鐢ㄨ鍏跺畠鐨勭紪璇戝櫒,灏卞彲浠ョ粌涔犵紪绋嬩簡,闈炲父閫傚悎鍒濆鑰呫傝繕鏈変竴涓淐璇█瀛︿範绯荤粺鈥濊蒋浠,涓嶈繃鎰熻鍙槸涓涓搴撶郴缁,濡傛灉浣犺寰楅鍋氱殑涓嶅,涓嶅Θ涔熷彲浠ヨ瘯...
绛旓細姘村钩鏂瑰悜鍔ㄩ噺瀹堟亽 (M-m)V=mVocosa V=mVocosa/(M-m)a=ug V^2=2aS S=(mVocosa)^2/2ug(M-m)^2
绛旓細绛斿棰鐨勪汉涓36-3=33浜恒傚亣璁炬棤浜哄悓鏃剁瓟瀵逛袱閬撻銆傚垯绛斿棰樼殑浜烘暟涓28+32=60浜恒傝屽疄闄呯瓟瀵归鐨勪汉鏁颁负33浜猴紝鍒欏鍑虹殑浜烘暟涓60-33=27浜恒傝鏄庤繖27浜烘槸鍥犱负鍚屾椂绛斿浜涓ら亾棰樿岃閲嶅璁＄畻鐨勩傛墍浠ョ瓟妗堜负涓ら閮界瓟瀵圭殑27浜恒傝繖鏄竴閬撻浮鍏斿悓绗肩殑绫诲瀷棰樸
绛旓細(3)鍏叡鍩虹鐭ヨ瘑鏄繀鑰冪殑锛屼笉绠′綘鏄VF锛岃繕鏄疺B锛孷C锛岄兘浼氳冨叕鍏卞熀纭鐭ヨ瘑锛屼竴鑸篃灏30鍒嗭紝鏈夌浉鍏崇殑涔︼紝鏈濂戒拱璁＄畻鏈鸿冭瘯涓績鐨勪功锛屽洜涓烘槸浠栦滑鍑鐨勯锛屼笉鍘氱殑涔︼紝涔熶笉璐碉紝鐪嬪畬鍏叡鍩虹鐭ヨ瘑杩欎笁鍗佸垎灏卞埌鎵嬩簡锛屽叕鍏卞熀纭鐭ヨ瘑涓嶆槸lz鎯宠薄涓殑鍏充簬IT浠涔堢殑锛屽畠鏄叧浜庢暟鎹簱锛岃绠楁満鍩虹鐨勪笢涓滐紝鍙互閫熸垚銆
绛旓細DWORD cbSize;//浠ュ瓧鑺備负鍗曚綅鐨勮繖涓粨鏋勭殑澶у皬 HWND hWnd;//鎺ユ敹鎵樼洏鍥炬爣閫氱煡娑堟伅鐨勭獥鍙ｅ彞鏌 UINT uID; //搴旂敤绋嬪簭瀹氫箟鐨勮鍥炬爣鐨処D鍙 UINT uFlags;//璁剧疆璇ュ浘鏍囩殑灞炴 UINT uCallbackMessage;//搴旂敤绋嬪簭瀹氫箟鐨勬秷鎭疘D鍙凤紝姝ゆ秷鎭紶閫掔粰hWnd HICON hIcon;//鍥炬爣鐨勫彞鏌 char szTip[64];//榧犳爣鍋滅暀...
绛旓細1 瑙ｏ細鈭 F娴=G鎺 鈭碏娴=4.9N 鈭礔娴=G-G绀 鈭碐=F娴+G绀=8N 2銆傗埖瀹屽叏娴告病 鈭碫鐗=V鎺=m/蟻=(G鎺/g)/蟻
绛旓細12.浼氭湁鐚ご鏇挎垜鐖变綘銆13.鏄撴媺缃愭媺鐜埍鐫鏄撴媺缃,鍙槗鎷夌綈蹇冮噷瑁呯潃鍙箰銆14.鏈汉鍥犵敓娲绘瀬搴﹁传鍥,闀挎湡浠ｅ啓灏忓瀵掋佹殤鍋囦綔涓,鏇垮皬瀛︾敓娆鸿礋鍏朵粬鍚屽,骞舵壙鎺ヤ互涓嬩笟鍔:鑻﹀姏鎼繍,閽崇剨,姘寸數,鐡﹀伐,鐮稿鎵撳湴娲,閫氬帟鎵涓嬫按閬,VF,C++,.NET,Java,asp,姹囩紪,flash,璁烘枃浠ｅ啓,鍥涘叚绾ф浛鑰,鍔炶瘉,娲楅挶,鎹夊ジ,瑕佸洪粦鏋,榛戣溅,鏆楁潃,...
