have_no
【隐身守候】
采纳率100%
2020-06-02 00:10

c语言初学者,请各位大佬帮忙!!!谢谢你!

已采纳

编写一个程序,求一个最大的正整数N,使N!<5000。
Private Sub Command1_Click()
Dim n As Integer, f As Long
f = 1
n = 1
While

f = f * n
n = n + 1
Wend
Print n-1
End Sub

某人想将手中的一张面值100元的人民币换成5元、1元和0.5元面值的票子50张,且要求每种至少1张。求换法的种数。
Private Sub Form_Click()
Dim i, j, k As Integer, RMBsum As Integer
RMBsum = 0
For i = 1 To 19
For j = 1 To 48
k = 50 - i - j
If Then
RMBsum = RMBsum + 1
Print i; j; k
End If

Next j, i
FontSize = 12: FontBold = True
Print RMBsum
End Sub

  • 点赞
  • 写回答
  • 关注问题
  • 收藏
  • 复制链接分享
  • 邀请回答

1条回答

  • caozhy 回答这么多问题就耍赖把我的积分一笔勾销了 10月前
    #include <stdio.h>
    int main()
    {
    int acc = 1;
    int n = 1;
    while (acc < 5000)
    {
    n++;
    acc = acc * n;
    }
    printf("%d", n - 1);
    }
    

    6

    问题解决的话,请点下采纳

    点赞 1 评论 复制链接分享