1题.编写程序,利用Function 函数计算式的值
y=(1+2+3+....+m)+(1+2+3+...+n)/(1+2+3+...+p)
2题.编一函数,在一直的字符穿S中,找出最长的单词.设字符穿S中只含有字母和空格,空格用来分割不同的单词.
速度要.30分钟内最好能帮我写好,小弟再送100分
M,N,P都是自定义字符

展开全部
收起
4回答
提交回答
  • 至过去的我

    2044人对此回答表示赞同

    我是未来的你,你现在是不是在年找寻小程序答案。你不要感觉诧异,给你来信原因,就是让你不在后悔。今天去学习如何推广小程序,相信......点击查看更多>
    发布于
  • Peyton

    13人对此回答表示赞同

    我是做脚本语言的,所以我的输出和VB的输出不太一样,而且没有变量类型,不过放在VB中100%能用,只要改一下输出函数
    1题是
    'window.document.write(sum(1,1,1))
    function sum(m,n,p)
    sum=sum1_x(m)+sum1_x(n)/sum1_x(p)
    end function
    'window.document.write(sum1_x(2))

    functi
    展开
    13
    0回复
    发布于 6年前

    评论(0)

    收起评论

  • 庄晋

    6人对此回答表示赞同

    '//VB我已经放下很久了,现在转行作C系语法语言的程序员了,所以VB很多东西都忘了。
    '//刚才安装了.net的vb.net开发工具,给你写的。
    Module Module1
        Sub Main()
            System.Console.WriteLine("累加合为:" + Convert.ToStrin
    展开
    6
    0回复
    发布于 6年前

    评论(0)

    收起评论

  • 睡觉爱好者

    6人对此回答表示赞同

    你的m,n,p是什么?输入字符么
    展开
    6
    0回复
    发布于 6年前

    评论(0)

    收起评论

  • 李如山

    2人对此回答表示赞同

    '第一题 都写那么复杂干什么? 这么写不就好了. 运算时间绝对比你们的短. 调用方式 Msgbox(y(12,32,54))

    Private Function y(m As Long, n As Long, p As Long)
    Dim T As Long, v As Long, s(2) As Long
    T = m
    If T < n Then T = n
    If T < p Then T = p
    For v =
    展开
    2
    0回复
    发布于 6年前

    评论(0)

    收起评论

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
咨询热线

13312967497

扫码添加业务即可随时咨询 还可领取小程序推广攻略

业务咨询: 13312967497
扫码咨询

扫码咨询套餐

回到顶部