"R‹(1) oder R3(2)"?ÞA
A=1ãGoto 0
A=2ãGoto 1
Lbl 0
ClrText
"a1"?ÞB
"a2"?ÞC
"b1"?ÞD
"b2"?ÞE
B©D™C©EÞF
If F=0
Then "linear abhaengig!"Ý
Else "linear unabhaengig!"Ý
IfEnd
Stop
Lbl 1
"2 Vek(2) oder 3 Vek(3)"?ÞA
A=2ãGoto 3
A=3ãGoto 2
Lbl 2
ClrText
"a1"?ÞB
"a2"?ÞC
"a3"?ÞD
"b1"?ÞE
"b2"?ÞF
"b3"?ÞG
"c1"?ÞH
"c2"?ÞI
"c3"?ÞJ
B©F©J‰E©I©D‰H©C©G™E©C©J™B©I©G™H©F©DÞK
If K=0
Then "linear abhaengig"
Else "linear unabhaengig"
IfEnd
Stop
Lbl 3
"a1"?ÞD
"a2"?ÞE
"a3"?ÞF
"b1"?ÞJ
"b2"?ÞK
"b3"?ÞL
If (DK=JE) And (DL=JF) And (EL=FK)
Then "linear abhaengig"
Else "linear unabhaengig"
IfEnd
Stop