Ia=2
Ua=5
fi=0.6

t=0:0.1:2*pi;
u=Ua*sin(t);
i=Ia*sin(t+fi);
p=u.*i;
plot(t,u,"1;u=Ua*sin(t);", ...
     t,i,"2;i=Ia*sin(t+fi);", ...
     t,p,"3;p=u*a;");
