计算机编程题目，[急]电脑VB编程题目，关于数学

近年来关注计算机编程题目的用户越来越多，小编整理了关于[急]电脑VB编程题目，关于数学，电脑编程题目 pascal语言，计算机VB编程试题，计算机编程题目??，供您参考

1.[急]电脑VB编程题目，关于数学

Private Sub Command1_Click()dim s as long ,t as long, i as integer,A as integer,B as integers=0 '总销售金额初始值For i = 1 To 113 \ 30 '从卖1张桌子到所有都卖桌子逐个对比销售总价 t=i * 30 + ((113 - i * 20) \ 16) * 20 '当卖i张桌子时，可得的总销售额 if s<t then '比较i与(i-1)时的总价钱 s=t A=i end ifNext iB=(113-20*A)\16Print "最多可以卖" & s & "元钱，" & "其中桌子" & A & "张，" & "椅子" & B & "张!"Print "剩余木材:" & Str(113 - 20 * A - 16 * B)End Sub '答案是:最多可以卖150元钱，其中桌子3张，椅子3张! 剩余木材:5

2.电脑编程题目 pascal语言

program p1var i,j,k:integer;begin k := 0; // 总和初始化 for i:=1 to 10 do // 行号 for j:=1 to 10 do // 列号 k := k + i*j; // 累加. i*j就是第i行第j列数字 writeln('总数和=',k);end.

3.计算机VB编程试题

不难的 sub shuzu()Dim a(3, 4) As i, j, k As i = 0 To 3 For j = 0 To 4 a(i, j) = Int(Rnd * 151 + 50) k = k + 1 Print Format(Str(a(i, j)), "000") & " "; '为了对齐 If k Mod 5 = 0 Then Print Next jNext iEnd Sub调用 call shuzu

4.计算机编程题目

((i%400==0)||(i%4==0))&&(i%100!=0) //不管什么语言，思想都应该是这样

如果以上内容没有帮到您，欢迎电话联系我们，或者联系在线客服咨询