编写程序,求在3000以内能被17或者23整除的正整数的个数

学习 时间:2026-03-30 10:57:44 阅读:6213
编写程序,求在3000以内能被17或者23整除的正整数的个数

最佳回答

老实的衬衫

标致的心锁

2026-03-30 10:57:44

Private Sub Command1_Click()Dim i As Integer,n As IntegerFor i = 1 To 3000If i Mod 17 = 0 Or i Mod 23 = 0 Then _n = n + 1NextPrint nEnd Su

最新回答共有2条回答

  • 瘦瘦的钥匙
    回复
    2026-03-30 10:57:44

    Private Sub Command1_Click()Dim i As Integer,n As IntegerFor i = 1 To 3000If i Mod 17 = 0 Or i Mod 23 = 0 Then _n = n + 1NextPrint nEnd Su

上一篇 英语翻译:无带病运转设备.

下一篇 匆匆 作者在文中表达了怎样的情感呢?联系课文句子写一写