XProfan

Español

p.specht

Bis a 10 x 10 - Matrizen es folgendes bastante rápidamente:

var n&=9
declarar A![n&,n&]
A![] = if(&index mod (n&+2),0,1)

Como una Declarar (o. Claro) el Einzelelemente automáticamente Null son, genügt lo para größere Matrizen, lediglich el Hauptdiagonalelemente en 1 a conjunto:

Kompilieren Marca Separación

Claro A![]:whileloop 0,n&:A![&Loop,&Loop]=1:wend

Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'...

14.05.2021 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Zum Quelltext

Tema opciones

Unreaded
subscribe
Remember-List
Notes
guests
Delete
Constantemente
Hecho

1.420 Views

Untitled	vor 0 min.
p.specht	21.11.2021
R.Schneider	20.11.2021
Uwe Lang	20.11.2021
Manfred Barei	19.11.2021
Más...

Themeninformationen

Dieses Thema ha 1 subscriber:

p.specht (1x)

XProfan

Quadratische Einheitsmatrix redactar

Zum Quelltext

Tema opciones

1.420 Views

Themeninformationen

Política de Privacidad

OGL-Basic
XProfan X4
XProfan X3
FreeProfan
XProfan X2
XProfan 11
XProfan 10
XProfan 9
XProfan 8
Infinity-Profan
Alle Sprachen