此程序主要查實(shí)現(xiàn)插入排序，過(guò)程為依次輸入集合A和B的元素，在一維數(shù)組space中建立表示集合(A-B)∪(B-A)
上傳時(shí)間： 2017-09-28
上傳用戶(hù)：jing911003
A design about 8051 (running at 12MHz) based system with 3 7-Seg displays and two buttons to implement the following functions. 1. When press the + button, the display C = A+B. 2. When press the button, the display C = A - B. “A” and “B” are 8-bit inputs when “C” is 9-bit output.
上傳時(shí)間： 2015-05-05
上傳用戶(hù)：guoxiy
求a^b的后四位，a,b可為long long 型整數(shù)
標(biāo)簽： 求a^b的后四位
上傳時(shí)間： 2015-12-16
上傳用戶(hù)：afqwer
實(shí)驗(yàn)源代碼 //Warshall.cpp #include<stdio.h> void warshall(int k,int n) { int i , j, t; int temp[20][20]; for(int a=0;a<k;a++) { printf("請(qǐng)輸入矩陣第%d 行元素:",a); for(int b=0;b<n;b++) { scanf ("%d",&temp[a][b]); } } for(i=0;i<k;i++){ for( j=0;j<k;j++){ if(temp[ j][i]==1) { for(t=0;t<n;t++) { temp[ j][t]=temp[i][t]||temp[ j][t]; } } } } printf("可傳遞閉包關(guān)系矩陣是:\n"); for(i=0;i<k;i++) { for( j=0;j<n;j++) { printf("%d", temp[i][ j]); } printf("\n"); } } void main() { printf("利用 Warshall 算法求二元關(guān)系的可傳遞閉包\n"); void warshall(int,int); int k , n; printf("請(qǐng)輸入矩陣的行數(shù) i: "); scanf("%d",&k); 四川大學(xué)實(shí)驗(yàn)報(bào)告 printf("請(qǐng)輸入矩陣的列數(shù) j: "); scanf("%d",&n); warshall(k,n); }
標(biāo)簽： warshall 離散 實(shí)驗(yàn)
上傳時(shí)間： 2016-06-27
上傳用戶(hù)：梁雪文以
已知系統(tǒng)函數(shù)為H(z)=1/[(1-0.2z^-1)(1-0.3z^-1)(1+0.4z^-1)]。試用長(zhǎng)除法求h(n)的6點(diǎn)輸出。 答案：clc;clear all;b=1;a=poly([0.2,0.3,-0.4]);x=deconv([1,zeros(1,6+4-1-1)],a)
上傳時(shí)間： 2017-10-21
上傳用戶(hù)：zhouhua
#include "iostream" using namespace std; class Matrix { private: double** A; //矩陣A double *b; //向量b public: int size; Matrix(int ); ~Matrix(); friend double* Dooli(Matrix& ); void Input(); void Disp(); }; Matrix::Matrix(int x) { size=x; //為向量b分配空間并初始化為0 b=new double [x]; for(int j=0;j<x;j++) b[j]=0; //為向量A分配空間并初始化為0 A=new double* [x]; for(int i=0;i<x;i++) A[i]=new double [x]; for(int m=0;m<x;m++) for(int n=0;n<x;n++) A[m][n]=0; } Matrix::~Matrix() { cout<<"正在析構(gòu)中~~~~"<<endl; delete b; for(int i=0;i<size;i++) delete A[i]; delete A; } void Matrix::Disp() { for(int i=0;i<size;i++) { for(int j=0;j<size;j++) cout<<A[i][j]<<" "; cout<<endl; } } void Matrix::Input() { cout<<"請(qǐng)輸入A:"<<endl; for(int i=0;i<size;i++) for(int j=0;j<size;j++){ cout<<"第"<<i+1<<"行"<<"第"<<j+1<<"列:"<<endl; cin>>A[i][j]; } cout<<"請(qǐng)輸入b:"<<endl; for(int j=0;j<size;j++){ cout<<"第"<<j+1<<"個(gè):"<<endl; cin>>b[j]; } } double* Dooli(Matrix& A) { double *Xn=new double [A.size]; Matrix L(A.size),U(A.size); //分別求得U，L的第一行與第一列 for(int i=0;i<A.size;i++) U.A[0][i]=A.A[0][i]; for(int j=1;j<A.size;j++) L.A[j][0]=A.A[j][0]/U.A[0][0]; //分別求得U，L的第r行，第r列 double temp1=0,temp2=0; for(int r=1;r<A.size;r++){ //U for(int i=r;i<A.size;i++){ for(int k=0;k<r-1;k++) temp1=temp1+L.A[r][k]*U.A[k][i]; U.A[r][i]=A.A[r][i]-temp1; } //L for(int i=r+1;i<A.size;i++){ for(int k=0;k<r-1;k++) temp2=temp2+L.A[i][k]*U.A[k][r]; L.A[i][r]=(A.A[i][r]-temp2)/U.A[r][r]; } } cout<<"計(jì)算U得:"<<endl; U.Disp(); cout<<"計(jì)算L的:"<<endl; L.Disp(); double *Y=new double [A.size]; Y[0]=A.b[0]; for(int i=1;i<A.size;i++ ){ double temp3=0; for(int k=0;k<i-1;k++) temp3=temp3+L.A[i][k]*Y[k]; Y[i]=A.b[i]-temp3; } Xn[A.size-1]=Y[A.size-1]/U.A[A.size-1][A.size-1]; for(int i=A.size-1;i>=0;i--){ double temp4=0; for(int k=i+1;k<A.size;k++) temp4=temp4+U.A[i][k]*Xn[k]; Xn[i]=(Y[i]-temp4)/U.A[i][i]; } return Xn; } int main() { Matrix B(4); B.Input(); double *X; X=Dooli(B); cout<<"~~~~解得:"<<endl; for(int i=0;i<B.size;i++) cout<<"X["<<i<<"]:"<<X[i]<<" "; cout<<endl<<"呵呵呵呵呵"; return 0; }
標(biāo)簽： 道理特分解法
上傳時(shí)間： 2018-05-20
上傳用戶(hù)：Aa123456789
module M_GAUSS !高斯列主元消去法模塊 contains subroutine LINEQ(A,B,X,N) !高斯列主元消去法 implicit real*8(A-Z) integer::I,K,N integer::ID_MAX !主元素標(biāo)號(hào) real*8::A(N,N),B(N),X(N) real*8::AUP(N,N),BUP(N) !A,B為增廣矩陣 real*8::AB(N,N+1) real*8::VTEMP1(N+1),VTEMP2(N+1) AB(1:N,1:N)=A AB(:,N+1)=B
標(biāo)簽： fortan Newton 程序 數(shù)值分析 方程 非線性
上傳時(shí)間： 2018-06-15
上傳用戶(hù)：answer123
無(wú)線電CW通聯(lián) 基本Q短語(yǔ)，通聯(lián)實(shí)例 A: CQCQCQ DE BA4ALC/5 BA4ALC/5 BA4ALC/5 PSE K B:BA4ALC/5 DE BD4IZL BD4IZL K A:BD4IZL DE BA4ALC/5 GM TNX FER CALL DR OM UR RST 559 55N K B:RR BA4ALC/5 DE BD4IZL GM DR OM TNX 55N RPRT UR 599 5NN FB MY NAME IS YU YU QTH JINAN JINAN BA4ALC/5 DE BD4IZL K A: DR YU OM TNX FB RPRT OP JACK JACK QTH NINGBO NINGBO WX HR IS FINE ES WARM TEMP 20C 20C HW? DE BA4ALC/5 K B:R DR JACK OM WX CLOUDY CLOUDY ES TEMP 15C 15C BT RIG FT80C FT80C ANT DIPOLE DP PWR 100WATTS 1TTW BA4ALC/5 DE BD4IZL K A: BD4IZL DE BA4ALC/5 MY RIG IS IC746PRO IC746PRO ES PWR 100W 1OOW BT ANT 2 ELE YAGI 2ELE YAGI 12MH TNX FER NICE QSO QSL VIA BURO HPE CUAGN BD4IZL DE BA4ALC/5 73 73 GL ES GB TU TU SK.. B:TNX FB CW QSO QSL QRZ.COM CUAGN BA4ALC/5 DE BD4IZL 73 DR JACK TU SK.. A:. B:.
上傳時(shí)間： 2019-03-05
上傳用戶(hù)：shuyinglee
為了增加公司收入，F(xiàn) 公司新開(kāi)設(shè)了物流業(yè)務(wù)。由于 F 公司在業(yè)界的良好口碑，物流業(yè)務(wù)一開(kāi)通即受到了消費(fèi)者的歡迎，物流業(yè)務(wù)馬上遍及了城市的每條街道。然而，F(xiàn) 公司現(xiàn)在只安排了小明一個(gè)人負(fù)責(zé)所有街道的服務(wù)。 任務(wù)雖然繁重，但是小明有足夠的信心，他拿到了城市的地圖，準(zhǔn)備研究最好的方案。城市中有 n 個(gè)交叉路口，m 條街道連接在這些交叉路口之間，每條街道的首尾都正好連接著一個(gè)交叉路口。除開(kāi)街道的首尾端點(diǎn)，街道不會(huì)在其他位置與其他街道相交。每個(gè)交叉路口都至少連接著一條街道，有的交叉路口可能只連接著一條或兩條街道。 小明希望設(shè)計(jì)一個(gè)方案，從編號(hào)為1的交叉路口出發(fā)，每次必須沿街道去往街道另一端的路口，再?gòu)? 新的路口出發(fā)去往下一個(gè)路口，直到所有的街道都經(jīng)過(guò)了正好一次。 輸入數(shù)據(jù)格式： 輸入的第一行包含兩個(gè)整數(shù)n, m(1≤n≤10, n-1≤m≤20)，表示交叉路口的數(shù)量和街道的數(shù)量，交叉 路口從1到n標(biāo)號(hào)。 接下來(lái)m行，每行兩個(gè)整數(shù)a, b，表示和標(biāo)號(hào)為a的交叉路口和標(biāo)號(hào)為b的交叉路口之間有一條街道， 街道是雙向的，小明可以從任意一端走向另一端。兩個(gè)路口之間最多有一條街道。 輸出輸出格式： 如果小明可以經(jīng)過(guò)每條街道正好一次，則輸出一行包含m+1個(gè)整數(shù)p1, p2, p3, ..., pm+1，表示小明經(jīng)過(guò)的路口的順序，相鄰兩個(gè)整數(shù)之間用一個(gè)空格分隔。如果有多種方案滿(mǎn)足條件，則輸出字典序最小的一種方案，即首先保證p1最小，p1最小的前提下再保證p2最小，依此類(lèi)推。 如果不存在方案使得小明經(jīng)過(guò)每條街道正好一次，則輸出一個(gè)整數(shù)-1。
標(biāo)簽： 代碼
上傳時(shí)間： 2019-07-04
上傳用戶(hù)：Rain
function [R,k,b] = msc(A) % 多元散射校正 % 輸入待處理矩陣，通過(guò)多元散射校正，求得校正后的矩陣 %% 獲得矩陣行列數(shù) [m,n] = size(A); %% 求平均光譜 M = mean(A,2); %% 利用最小二乘法求每一列的斜率k和截距b for i = 1:n a = polyfit(M,A(:,i),1); if i == 1 k = a(1); b = a(2); else k = [k,a(1)]; b = [b,a(2)]; end end %% 求得結(jié)果 for i = 1:n Ai = (A(:,i)-b(i))/k(i); if i == 1 R = Ai; else R = [R,Ai]; end end
上傳時(shí)間： 2020-03-12
上傳用戶(hù)：15275387185
蟲(chóng)蟲(chóng)下載站版權(quán)所有 京ICP備2021023401號(hào)-1
<sup id="g6igw"></sup>