idl創造對角線為1的數組

『壹』 建立並輸出一個10*10的矩陣,該矩陣對角線元素為1,其餘元素均為0

dim a(0 to 9,0 to 9) as double
dim i as int
for i = 0 to 9
a(i,i) = 1
next
以上是第一題，寫成0 to 9 是怕你以為直接寫9是9*9的

第二題的「從鍵盤輸入」不是很理解，不知道你要從哪裡輸入,10個textbox?那你自己寫上給數組賦值的代碼就是了
下面程序假定數組中已經有了輸入：a(0 to 9)
dim b(9) as double
for i = 0 to 9
b(i)= a(i-9)
next
自己輸出b就是了

『貳』 創建一個7*7的二維數組，對角線為1，其他為0，並輸出

package chow.web;

public class A {
public static void main(String args[]){
int[][] array = new int[7][7];
for(int i = 0;i<7;i++){
array[i][i] = 1;
}
for(int i = 0 ; i<7;i++){
for(int j = 0 ;j<7;j++){
System.out.print(array[i][j] + " ");
}
System.out.println();
}

}

}

Java 初始的時候是把數組全置為0的;
只需把對角線的元素置為1

『叄』 如何用MATLAB生成一個主對角線為1，其他值相同的toeplitz矩陣

比如n×n矩陣，其他值是b=8

n=6;%6×6矩陣
b=8;
a=b*ones(n,n)./(diag((b-1)*ones(n,1))+ones(n,n))

『肆』 編寫程序,建立並輸出一個10×10的矩陣,該矩陣對角線元素為1,其餘元素均為0

main()
{
int j,i;
int a[10][10];
for(i=0;i<10;i++)
{
for(j=0;j<10;j++)
{
if(j==i)
a[i][j]=1;//此處
else
a[i][j]=0;
}
for(i=0;i<10;i++)
{
for(j=0;j<10;j++)
printf("%d\t",a[i][j]);
printf("\n");

}
}如果是兩條對角線都是1的話
可以把if(j==i)改為if(j==i&&(j+i)==9)

『伍』 MATLAB如何創建主對角線都是1的矩陣

1、首先打開matlab軟體，輸入一個向量n，向量n有4個元素，使用diag函數生成對角矩陣。

『陸』 用matlab，做一個對角線為1，aij=1/aji的n階矩陣，求大神

A=1./A;
A(logical(eye(size(A))))=1;

『柒』 matlab問題:產生對角線上全為1，其餘為0的2行3列矩陣的命令

方案一、就是一樓回答的，用eye函數：
>> eye(2,3)
ans =
1 0 0
0 1 0

方案二、若不知道eye函數，因為你的問題中 行數和列數都很小，所以直接賦值就可以了：
x = zeros(2,3);
x(1,1) = 1;
x(2,2) = 1;

方案三、若不知道eye函數，而行數和列數又都較大，則只能使用循環了：
下面假設 m≤n.
x = zeros(m,n)
for k = 1:m
x(k,k) = 1;
end

OK!

『捌』 急！ 如何用matlab實現將矩陣變換為對角線元素為1的矩陣（非對角元素不一定為1）

問題描述不詳。按自己的理解出牌：
假設你的矩陣是x，要將x的對角線全變為1，語句如下
d = diag(x);
h = 1./d;
y = diag(h)*x; %y即為所求.

『玖』 編寫程序,建立並輸出一個10x10的矩陣,該對角線元素為1,其餘元素均為0

Dim a(9,9) As Integer
dim i as integer
dim j as integer
For i = 0 To UBound(a, 1)
For j = 0 To UBound(a, 2)
If i = j Or i + j = 9 Then a(i, j) = 1
print a(i, j),
Next
print
Next
注:該矩陣的下標默認下界為0,所以聲明的時候是(9,9),如果你把下標的下界改為1的話,聲明時就是(10,10)

『拾』 建立一個輸出n×n的矩陣，該矩陣對角線元素為1其餘為0n值通過鍵盤輸入完成對角線的元素賦值為1通過子程序

我編寫的matlab代碼如下：
x=input('please input n :');
M=diag(0*[1:x]+1,0)
保存後，運行即可，很好用的。請問你會用Matlab嗎？