Programmieren einer Funktion < Maple < Mathe-Software < Mathe < Vorhilfe
|
| Status: |
(Frage) beantwortet  | | Datum: | 18:36 So 26.11.2006 | | Autor: | epsilon1 |
Man soll dort eine Funktion programmieren. Leider arbeite ich nicht oft mir MAPLE und kann die meisten Befehle nicht, aber ich habe die folgenden Varianten, die jedoch alle nicht laufen. Vielleicht kann mir ja jemand helfen. Danke!
Variante 1:
zickzack := proc([a],[b]);
zaehler = 1;
if (zaehler <= nops([a])) then
c[zaehler] := a[zaehler], b[zaehler];
[c];
fi;
end;
Variante 2:
zick := proc ( a , b) local zaehler, c; for zaehler from 1 to nops(a) do c[zaehler] = a[zaehler]; c[zaehler + 1] = b [zaehler]; zaehler = zaehler + 1;
> end do;
> end;
Variante 3:
zickzack := proc ( a , b ) local zaehler1, zaehler2, zaehler3, zaehler4, i, Ergebnis; zaehler2 := 1;
> print(nops(a));
>
> for zaehler1 from 1 to nops(a) do Ergebnis[zaehler2] := a[zaehler1]; print(Ergebnis[zaehler2]); zaehler2 := zaehler2 + 2; zaehler1 := zaehler1 + 1;
> end do;
>
> zaehler4 := 2;
>
> for zaehler3 from 1 to nobs(b) do Ergebnis[zaehler4] := b[zaehler3]; print(Ergebnis[zaehler4]); zaehler4 := zaehler4 + 2; zaehler3 := zaehler3 + 1;
> end do;
>
> print(Ergebnis);
> end;
Keine dieser Varianten funktioniert!!!
|
|
| |
|
Hallo,
Variante 1 kann so gar nicht funktionieren, weil du nur einen einzigen Durchlauf machst. Du benutzt ja nur ein if anstelle einer for-Schleife.
Ansonsten sind deine syntaktischen Fehler in Variante 1:
> zickzack := proc([a],[b]);
Es muss "zickzack := proc(a,b);" heißen.
> zaehler = 1;
Das ist nur ein Vergleich, ein Zuweisung ist ":=".
> if (zaehler <= nops([a])) then
Hier muss die eckige Klammer auch weg.
> c[zaehler] := a[zaehler], b[zaehler];
Das funktioniert so nicht. Hier muss man "op()" benutzen (s. Variante 2).
> [c];
???
fi;
end;
Variante 2:
> zick := proc ( a , b)
> local zaehler, c;
Ja. Außerdem initialisieren wir c mit einer leeren Liste:
c := [];
> for zaehler from 1 to nops(a) do
Ja.
> c[zaehler] = a[zaehler]; c[zaehler + 1] = b [zaehler];
Das funktioniert nicht. Wozu war denn in der Aufgabe der Hinweise auf op?
Es muss heißen:
c := [op(c), a[zaehler], b[zaehler]];
> zaehler = zaehler + 1;
Das darfst du nicht machen! zaehler ist die Zählervariable der for-Schleife. Also wird sie automatisch hochgezählt. Wenn du das auch noch machst, wir sie immer dopelt hochgezählt!
> end do;
> end;
Variante 3:
Hier zählst du die Zählervariablen wieder doppelt hoch. Außerdem weist du Ergebnis das Ergebnis von print(nops(a)) zu, was ich gar nicht verstehe.
Damit das Ganze funkioniert, musst du außerdem noch Ergebnis als Liste initialisieren.
Hier die korrigierte Variante:
zickzack := proc ( a , b ) local zaehler1, zaehler2, zaehler3, zaehler4, i, Ergebnis;Ergebnis:=[seq(0,i=1..2*nops(a))]; zaehler2 := 1;
for zaehler1 from 1 to nops(a) do Ergebnis[zaehler2] := a[zaehler1]; zaehler2 := zaehler2 + 2;
end do;
zaehler4 := 2;
for zaehler3 from 1 to nops(b) do Ergebnis[zaehler4] := b[zaehler3]; zaehler4 := zaehler4 + 2; end do;
Ergebnis:
end;
Gruß
Martin
|
|
|
|
![[]](/images/popup.gif){kind=small}
Hier geht es zur Aufgabe (Es geht um die zweite Aufgabe auf dem Zettel)
