Графічне відображення схеми та хвильових діаграм струму, напруги та потужності в колі змінного струму з активним опором та індуктивністю

setcolor(2);

for(wt=0; wt<640; wt+=3)

{ U=Um*cos_fi*sin(wt)+Um*sin_fi*sin(wt+PI/2);

lineto(wt, U+240);

}

outtextxy(0, 10, "Graph of function U(wt):");

getch();

cleardevice();

moveto(0, 240);

setcolor(3);

for(wt=0; wt<640; wt+=3)

{ I=Im*sin(wt);

lineto(wt, I+240);

}

outtextxy(0, 10, "Graph of function I(wt):");

getch();

cleardevice();

moveto(0, 240);

setcolor(5);

for(wt=0; wt<640; wt+=3)

{ P=Um*cos_fi*sin(wt)*Im*sin(wt);

lineto(wt, P+240);

}

outtextxy(0, 10, "Graph of function P(wt):");

getch();