VB試題,急求答案,謝謝

2021-03-04 08:10:18 字數 491 閱讀 7561

1樓:聽不清啊

private sub ***mand1_click()dim f(50) as long

f(0) = 1

f(1) = 1

for i = 3 to 50

f(i) = f(i - 1) - 2 * f(i - 2) + f(i - 3)

next i

maxi = 0

mini = 0

for i = 0 to 50

picture1.print format(f(i), "@@@@@@@@@");

if i mod 8 = 7 then picture1.printif f(i) > f(maxi) then maxi = iif f(i) < f(mini) then mini = inext i

label1.caption = "最大值為:

" & f(maxi) & ",最小值為:" & f(mini)end sub

C語言習題急求答案,C語言試題,急求答案,謝謝大家。

內容來自使用者 chen0225ljy 第一章1.1 題目內容 1 include main 2 include main else 3 include main int i 0 for i 0 i 5,i printf d a i 4 include main int i 0 int j 1 fo...

急求vb程式設計題答案,急求VB程式設計題答案

private sub command1 click dim i as integer text1.text list1.list 0 for i 0 to 9 if val list1.list i val text1.text then text1.text list1.list i next ...

flash試題,Flash試題,求答案。急求!!

aaabaa bbcc dacd cadx ab關鍵幀 空白關鍵幀 普通幀 引導層 遮罩層 圖形 按鈕 影片剪輯 部分題目有問題,請注意。aa abaa bbcc dacd cadx ab關鍵幀 空白關鍵幀 普通幀 引導層 遮罩專層 圖形 按鈕 影片剪屬輯 影片剪輯 12 這道題有問題,flash ...