# Extremwerte bei Parameter-
darstellung

## Problembeschreibung

Gegeben ist eine Funktion in Parameterdarstellung. Die
Koordinaten der Extermwerte sind zu bestimmen.

Testdaten: x(t):=t  und y(t):=t**2-8*t+15

## Problemlösung

EINGABE

xt:read("Gib die Parameterdarstellung x(t):= ein");

yt:read("Gib die Parameterdarstellung y(t):= ein");

VERARBEITUNG

abxt:diff(x(t),t);

abyt:diff(y(t),t);

ab:abyt/abxt;

l:realroots(ab=0);

n:length(l);

AUSGABE

for i:1 thru n do print(ev(x(t),l[i]),ev(y(t),l[i])),numer;