代码搜索结果
找到约 36,166 项符合
Raspberry Pi 的代码
sinc.m
function y=sinc(x)
% 函数 y=sinc(x)=sin(pi*x)./(pi*x)
% -----------------------
x = x + eps;
y = sin(pi*x) ./ (pi*x);
vc0407.cpp
// Example 4-7：求π的近似值
#include
#include
void main()
{
int s = 1;
double n = 1.0, u = 1.0, pi = 0.0;
while(fabs(u)>=1e-4)
{
pi = pi+u;
n = n+2;
s = -s;
u =
d6r1.txt
Private Sub Command1_Click()
'PROGRAM D6R1
'Driver for routine RAN0
'Calculates pi statistically using volume of unit n-sphere
PI = 3.1415926
Dim IY(3), YPROB(3)
IDUM& =
d6r4.txt
Private Sub Command1_Click()
'PROGRAM D6R4
'Driver for routine RAN3
'Calculates pi statistically using volume of unit n-sphere
PI = 3.1415926
Dim IY(3), YPROB(3)
IDUM& =
d6r3.txt
Private Sub Command1_Click()
'PROGRAM D6R3
'Driver for routine RAN2
'Calculates pi statistically using volume of unit n-sphere
PI = 3.1415926
Dim IY(3), YPROB(3)
IDUM& =
c3ffun.m
function y=c3ffun(x)
y=2/sqrt(pi)*exp(-x.^2);
c10mga1.m
function [sol,y]=c10mga1(sol,options)
x=sol(1); y=x.*sin(10*pi*x)+2;
fseries.m
function [A,B,F]=fseries(f,x,n,a,b)
if nargin==3, a=-pi; b=pi; end
L=(b-a)/2;
if a+b, f=subs(f,x,x+L+a); end
A=int(f,x,-L,L)/L; B=[]; F=A/2;
for i=1:n
an=int(f*cos(i*pi*x/L),x,-L,L)/L;
motorpara.m
%马达的特性参数
Kv=3015;
Kt=30/(pi*Kv);
Ra=0.025;%欧姆
I0=5; %安培
13kfft0.c
#include "stdio.h"
#include "13kfft.c"
#include "math.h"
main()
{ int i,j;
double pr[64],pi[64],fr[64],fi[64];
for (i=0; i