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

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条回答 默认 最新

  • threenewbee 2020-06-02 09:32
    已采纳
    #include <stdio.h>
    int main()
    {
    int acc = 1;
    int n = 1;
    while (acc < 5000)
    {
    n++;
    acc = acc * n;
    }
    printf("%d", n - 1);
    }
    

    6

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

    已采纳该答案
    评论
    解决 无用
    打赏 举报

相关推荐 更多相似问题