Fouriertransformation

Remove["Global`*"]
Needs["Calculus`FourierTransform`"]
funktion[t_]=			(* Funktion von t eingeben *)
FourierTransform[funktion[t],t,w]
%//ComplexExpand

Beispiel:

Remove["Global`*"]
Needs["Calculus`FourierTransform`"]
funktion[t_]=Abs[1-t]+Abs[1+t]
g1=Plot[funktion[t],{t,-2,2}, PlotRange->{{-2,2},{0,5}}]
ff[w_]=FourierTransform[funktion[t],t,w]
%//ComplexExpand