KLAVYEDEN COKLU VERiNiN GiRiLMESi VE N*N TiPiNDE BiR A MATRiSiNE YERLEžTiRiLMESi

5 CLS
10 INPUT "Kare Matrisin Tipini Giriniz: ", N
20 DIM A(N,N) : PRINT
30 FOR X = 1 TO N
40 FOR Y = 1 TO N
50 PRINT "A("; X; ","; Y; ") = "; : INPUT "", A(X, Y)
70 NEXT Y, X
END