% PRAKTIKUM ALJABAR LINIER 2011
'PRAKTIKUM ALJABAR LINIER 2011' % Text yang akan ditampilkan di "Command Window"
% Meng-INPUT DATA
A = input('Ketik No. Stb. anda tanpa huruf D dalam bentuk vektor baris ')
pause
% Men-TRANSPOSE MATRIX
'B adalah A-transpose'
B = A'
pause
% Mengalikan MATRIX
'C adalah A*B'
C = A*B
pause
'D adalah B*A'
D = B*A
pause
% Mem-PLOT MATRIX
plot(D), grid on, xlabel('kolom ke'), ylabel('nilai elemen')
% Determinan MATRIX
'Menghitung Determinan Matrix D'
detD = det(D)
'Kennnaaa...pa selalu NOL?'
pause
% Memangkatkan MATRIX
'Matrix E adalah D*D'
E = D*D
plot(E), grid on, xlabel('kolom ke'), ylabel('nilai elemen')
pause
'Matrix F adalah D^2'
F = D^2
plot(F), grid on, xlabel('kolom ke'), ylabel('nilai elemen')
pause
'Apakah E sama dengan F?'
G = E-F
pause
detE = det(E) % Menghitung determinan matrix E = D*D
detF = det(F) % Menghitung determinan matrix F = D^2
'Matrix yang determinan=nya nol, jika dipangkatkan 2, tetap determinan-nya nol'
pause
% Mengalikan matrix elemen demi elemen
'Matrix H adalah D.*D, yaitu mengalikan setiap elemen dengan dirinya sendiri'
H = D.*D
pause
'Apakah H sama dengan F?'
J = H-F
pause
'Ternyata tidak sama'
plot(H), grid on, xlabel('kolom ke'), ylabel('nilai elemen')
detH = det(H)
'Ternyata juga nol'