Mathc matrices/022
Installer et compiler ces fichiers dans votre répertoire de travail.
c00a.c |
---|
/* ------------------------------------ */
/* Save as : c00a.c */
/* ------------------------------------ */
#include "v_a.h"
void fun(int rc)
{
double **A = r_mR(i_mR(rc,C1),99);
double **D = i_mR(rc,rc);
clrscrn();
printf(" A :");
p_mR(A, S4,P0, C8);
printf(" D :");
c_c_diag_mR(A,D);
p_mR(D, S4,P0, C8);
f_mR(A);
f_mR(D);
}
/* ------------------------------------ */
int main(void)
{
time_t t;
srand(time(&t));
do
fun(rp_I(RC5));
while(stop_w());
return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */
Copier une matrice d'une colonne dans une matrice diagonale :
Exemple de sortie écran :
A :
+5
+61
-26
+3
+89
D :
+5 +0 +0 +0 +0
+0 +61 +0 +0 +0
+0 +0 -26 +0 +0
+0 +0 +0 +3 +0
+0 +0 +0 +0 +89
Press return to continue
Press X return to stop