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

# define PI 3.1415

void checkgr(void);

void main()

{ float Ua, Um, Ul, I, Im, U, r, Xl, P, Ql, wt, cos_fi, sin_fi, Z;

char ch;

textmode(3);

MENU:

clrscr();

puts("What do you want to do?\n");

puts("1 - Show GRAPHs;");

puts("2 - Show e-circle;");

puts("3 - Author...");

puts("0, ESC - Exit program.");

while((ch=getch())!=0)

{

switch(ch)

{ case '1':

float Ua, Um, Ul, I, Im, U, r, Xl, P, Ql, wt, cos_fi, sin_fi, Z;

clrscr();

puts("Input Um:");

scanf("%f", &Um);

puts("Input Im:");

scanf("%f", &Im);

puts("Input Xl:");

scanf("%f", &Xl);