Matlab编写M函数

1、首先建立自定义函数m文件

function F=myfun(b)

syms x a c

%a——α；b—粗穗—β；c——φ

a=atan(1/(sin(c)*tan(b)))

F=int(int(sin(x)*cos(x),a,pi/2),0,pi)

end

2、在命令窗口中，输入洞凳源

b=pi/3；纳态  %β，回车

F=myfun(b) %回车

1、使用VB编程，程序如下：

Private Sub Command1_Click()

Dim n As Integer,i As Integer,s As Single,m As Integer

n = Val(Text1.Text)

For m = 1 To n

i = 3 ^ (m - 1)

s = s + i

Exit For

Next m

Text2.Text = s

End Sub

2、使用C语言编写，程序如下：

int mn(int m,int n)

{

if(n==1)

return m

else

return m*mn(m,n-1)

}

main()

{

printf("%d",mn(3,6))

getch()

}

3、使用C++编写，程序如下：

#include<iostream.h>

void main(void)

{

int m,n,t=1

cout<<"输入m="

cin>>m

cout<<"输入n="

cin>>n

for(int i=0i<ni++)

{

t*=m

}

cout<<'m^n='<<t

}

扩展资料：

Visual Basic 语言具有不支持继承、无原生支持多线程、异常处理不完善等三项明显缺点，使其有所局限性。

1、不支持继承

VB 5.0 和 VB 6.0 都是基于对象的编程语言，但是不包含继承特性。VB 中提供了特殊的类的功能，但是还是不能满足程序员的需求。

2、无原生支持多线程

Visual Basic 对于多线程无原生支持，只能通过Windows API的调用实现，且极其的不稳定。因为在API创建的线程中，并没有自动初始化运行时库，导致部分的函数无法使用。一族如般的，在VB6等早期的VB开发环境下，使用API创建线程的目的是完成容易使程序假死的大量数据或者逻辑的计算。

3、异常处理不完善

Visual Basic 中内置异常处理，即使未写异常处理代码，一旦用户出错也会锋穗裂d出一个明确写出出错原因对话框，接着程序终止。

Visual Basic 中可以使用 Err.Raise抛出异常。对系统及用户抛出的异常的处理常用两种模式：一是使用 On Error Resume Next 处理错误；另一种是使用 On Error Goto 将运行引银闭入错误处理代码。但相对 C++ 等语言而言，这样的异常处理破坏了代码的结构。

参考资料来源：百度百科-VB

---