Fortran - Tóm tắ t nộ i dung mô n họ c Các khái niệ m và yế u tố trong ngô n ngữ lậ p trình FORTRAN. Các câ u lệ nh củ a ngô n ngữ FORTRAN. Cơ bả n về chư ơ ng chư ơ ng dị ch và mô i trư ờ ng lậ p trình DIGITAL Visual Fortran. Viế t và chạ y các chư ơ ng trình cho các bài toán đ ơ n giả n bằ ng ngô n ngữ FORTRAN.
標(biāo)簽： Fortran 7855 7897 7885
上傳時間： 2013-12-25
上傳用戶：songrui
讀入開關(guān)量到8255A，再將其通過指示燈顯示。以8255A的A口作輸入，B口作輸出，輸入用開關(guān)，輸出用發(fā)光管，要求當(dāng)輸入不全為0時，輸入與輸出保持一致。當(dāng)輸入為全0時，發(fā)光二極管閃爍。
上傳時間： 2017-08-30
上傳用戶：xuanjie
實驗源代碼 //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("請輸入矩陣第%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("請輸入矩陣的行數(shù) i: "); scanf("%d",&k); 四川大學(xué)實驗報告 printf("請輸入矩陣的列數(shù) j: "); scanf("%d",&n); warshall(k,n); }
上傳時間： 2016-06-27
上傳用戶：梁雪文以
#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<<"請輸入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<<"請輸入b:"<<endl; for(int j=0;j<size;j++){ cout<<"第"<<j+1<<"個:"<<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<<"計算U得:"<<endl; U.Disp(); cout<<"計算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)簽： 道理特分解法
上傳時間： 2018-05-20
上傳用戶：Aa123456789
為微蕊的單片機與LCD interface
上傳時間： 2018-10-25
上傳用戶：mike329
# include<stdio.h> # include<math.h> # define N 3 main(){ float NF2(float *x,float *y); float A[N][N]={{10,-1,-2},{-1,10,-2},{-1,-1,5}}; float b[N]={7.2,8.3,4.2},sum=0; float x[N]= {0,0,0},y[N]={0},x0[N]={}; int i,j,n=0; for(i=0;i<N;i++) { x[i]=x0[i]; } for(n=0;;n++){ //計算下一個值 for(i=0;i<N;i++){ sum=0; for(j=0;j<N;j++){ if(j!=i){ sum=sum+A[i][j]*x[j]; } } y[i]=(1/A[i][i])*(b[i]-sum); //sum=0; } //判斷誤差大小 if(NF2(x,y)>0.01){ for(i=0;i<N;i++){ x[i]=y[i]; } } else break; } printf("經(jīng)過%d次雅可比迭代解出方程組的解：\n",n+1); for(i=0;i<N;i++){ printf("%f ",y[i]); } } //求兩個向量差的二范數(shù)函數(shù) float NF2(float *x,float *y){ int i; float z,sum1=0; for(i=0;i<N;i++){ sum1=sum1+pow(y[i]-x[i],2); } z=sqrt(sum1); return z; }
上傳時間： 2019-10-13
上傳用戶：大萌萌撒
AT89S52單片機主8入8出繼電器工控主板ALTIUM設(shè)計硬件原理圖+PCB文件,2層板設(shè)計，大小為121x149mm，Altium Designer 設(shè)計的工程文件，包括完整的原理圖及PCB文件，可以用Altium(AD)軟件打開或修改，可作為你的產(chǎn)品設(shè)計的參考。主要器件型號列表如下：Library Component Count : 25Name Description----------------------------------------------------------------------------------------------------24LC02AJKG 按鍵開關(guān)AT89S52-P 8 位微處理器/40引腳CAP CapacitorCAPACITOR POL CapacitorCPDR 瓷片電容CRYSTAL CrystalD Connector 9 Receptacle Assembly, 9 Position, Right AngleDG 電感DJDR 電解電容GO 光耦Header 5X2 Header, 5-Pin, Dual rowJDQYCK 繼電器——1常開1常閉LED 發(fā)光二極管LM2576HVT-3.3 Simple Switcher 3A Step Down Voltage RegulatorMAX232 NPN NPN Bipolar TransistorPZ_2 排針——2PZ_3 排針——3RES2Res 電阻Res PZ_8 8位排阻SW-DPST Double-Pole, Single-Throw SwitchWY2JG 穩(wěn)壓二級管ZL2JG 整流二極管
上傳時間： 2021-11-17
上傳用戶：kingwide
家 庭 總 線 是 智 能 家 居 實 現(xiàn) 的 重 要 基 礎(chǔ) ． 是 住 宅 內(nèi) 部 的 神 經(jīng) 系 統(tǒng) ． 其 主 要 作 用 是 連 接 家 中的各 種 電子 、 電氣 設(shè) 備 ． 負(fù)責(zé) 將 家 庭 內(nèi) 的 各 種 通 信 設(shè) 備 ( 包 括 安 保 、 電話 、 家 電 、 視 聽 設(shè) 備 等 )連 接 在 一 起 ． 形 成 一 個 完 整 的家 庭 網(wǎng) 絡(luò) 。 日 本 是 較 早 推 動 智 能 家 居 發(fā) 展 的 國 家 之 一 ， 它 較 早 地 提 出 了 家庭 總線 系統(tǒng) (H O m e B u S S Y S t e m ， 簡稱H B S ) 的概念 ． 成 立 了 家庭 總線 (H B S )研 究會 ． 并 在 郵政省和 通 產(chǎn) 省 的指 導(dǎo) 下 組 成 了H B S 標(biāo) 準(zhǔn)委 員 會 ， 制定 了 日 本 的H B s 標(biāo) 準(zhǔn) 。 按 照 該 標(biāo) 準(zhǔn) ， H B S 系統(tǒng) 由一 條 同 軸 電 纜 和 4 對 雙 絞 線 構(gòu) 成 ， 前 者 用 于 傳 輸 圖 像 信 息 ． 后者 用 于 傳輸語 音 、 數(shù)據(jù)及 控制信 號 。 各 類家用 設(shè) 備 與 電氣 設(shè) 備 均 按 一 定 方式 與H B S 相 連 ， 這 些 電氣設(shè) 備 既 可 以在 室 內(nèi)進 行 控制 ． 也 可 在異地 通 過 電話進行 遙 控 。 為適 應(yīng) 大型 居住社 區(qū) 的需 要 ， 1 9 8 8 年年初 ， 日 本住 宅信息 化推進協(xié)會 又 推 出 了 超級 家庭總 線 (S u p e r H0 m e B u s S y s t e m ， 簡 稱S - H B S ) ， 它適 用 于 更 大 的范 圍 ． 因 為一 個S - H B s 系統(tǒng)可 掛接 數(shù)千個家庭 內(nèi)部 網(wǎng) 。 家庭 智能化要 求諸 多家 電和 網(wǎng)絡(luò)能夠彼此 相容 ． 總線協(xié) 議是 其精髓 所 在 ， 只 有接 E l 暢通 ， 家 電才能 “ 聽懂 ” 人 發(fā) 出的指令 ， 因此 總線標(biāo)準(zhǔn) 的物理 層 接 口 形 式 是 智能 家居 亟 待解決 的重 要 問題 之 一 。 目前 比 較成型 的總線標(biāo) 準(zhǔn) 協(xié) 議 主 要 是 美 國公 司 提 出 的 ， 包 括E c h e l o n 公 司 I)~L o n W o r k s 協(xié)議 、 電子 工 業(yè) 協(xié) 會 (E I A ) 的C E 總線協(xié) 議 (C EB u S ) 、 S m a r t Ho u s e L P 的智 能屋 協(xié) 議 和×一 1 0 公 司 的X 一 1 0 協(xié) 議等。 這 些 協(xié) 議 各 有 優(yōu) 劣 。
標(biāo)簽： 智能家居
上傳時間： 2022-03-11
上傳用戶：
AR0231AT7C00XUEA0-DRBR（RGB濾光）安森美半導(dǎo)體推出采用突破性減少LED閃爍 (LFM)技術(shù)的新的230萬像素CMOS圖像傳感器樣品AR0231AT，為汽車先進駕駛輔助系統(tǒng)(ADAS)應(yīng)用確立了一個新基準(zhǔn)。新器件能捕獲1080p高動態(tài)范圍(HDR)視頻，還具備支持汽車安全完整性等級B(ASIL B)的特性。LFM技術(shù)(專利申請中)消除交通信號燈和汽車LED照明的高頻LED閃爍，令交通信號閱讀算法能于所有光照條件下工作。AR0231AT具有1/2.7英寸(6.82 mm)光學(xué)格式和1928(水平) x 1208(垂直)有源像素陣列。它采用最新的3.0微米背照式(BSI)像素及安森美半導(dǎo)體的DR-Pix?技術(shù)，提供雙轉(zhuǎn)換增益以在所有光照條件下提升性能。它以線性、HDR或LFM模式捕獲圖像，并提供模式間的幀到幀情境切換。 AR0231AT提供達(dá)4重曝光的HDR，以出色的噪聲性能捕獲超過120dB的動態(tài)范圍。AR0231AT能同步支持多個攝相機，以易于在汽車應(yīng)用中實現(xiàn)多個傳感器節(jié)點，和通過一個簡單的雙線串行接口實現(xiàn)用戶可編程性。它還有多個數(shù)據(jù)接口，包括MIPI(移動產(chǎn)業(yè)處理器接口)、并行和HiSPi(高速串行像素接口)。其它關(guān)鍵特性還包括可選自動化或用戶控制的黑電平控制，支持?jǐn)U頻時鐘輸入和提供多色濾波陣列選擇。封裝和現(xiàn)狀：AR0231AT采用11 mm x 10 mm iBGA-121封裝，現(xiàn)提供工程樣品。工作溫度范圍為-40℃至105℃(環(huán)境溫度)，將完全通過AEC-Q100認(rèn)證。
標(biāo)簽： 圖像傳感器
上傳時間： 2022-06-27
上傳用戶：XuVshu
介紹了一種高速、高性能的單片機C8051F330，該單片機內(nèi)部集成了眾多的功能部件，是真正的混合信號在片系統(tǒng)。本文對單片機的功能和特點做了詳細(xì)的介紹，并以一個實際的多路溫濕度測控系統(tǒng)為例，給出
標(biāo)簽： C8051F330 單片機 多路 溫濕度測控系統(tǒng)
上傳時間： 2013-07-28
上傳用戶：l254587896
蟲蟲下載站版權(quán)所有 京ICP備2021023401號-1
