WWW.REFERATCENTRAL.ORG.UA - Я ТУТ НАВЧАЮСЬ

... відкритий, безкоштовний архів рефератів, курсових, дипломних робіт

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

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

Міністерство освіти і науки України

Рівненський державний технічний університет

Кафедра електротехніки і автоматики

Курсова робота

з дисципліни "Програмування і алгоритмічні мови"

Варіант 5.

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

Виконав студент І-го курсу ФПМіКІС, групи АУТП-12, Чайка І. В.

Керівник: Пастушенко В. Й.

Рівне 2000

Завдання

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

Зміст.

  • Вступ 3

  • Пояснення 4

  • Лістінг програми 5

  • Приклад 9

  • Висновок 11

  • Список використаної літератури 12

    Вступ.

    З метою набуття навиків по створенню фрагментів програмного забезпечення , а також закріплення, поглиблення та узагальнення знань, одержаних на лекціях та лабораторних заняттях в рамках дисципліни "Програмування та алгоритмічні мови" студенти першого курсу виконують курсову роботу під назвою "Розробка програми для відображення динаміки параметрів технологічного процесу чи пристрою автоматики".

    Програма розроблена для опису електричного кола активного струму з активним опором та індуктивністю, має зручний та зрозумілий інтерфейс. При її включенні вмикається меню з трьох пунктів:

  • Show graphs (показати графіки);

  • Show e-circle (показати електричне коло);

  • Author (автор).

    Після вибору першої опції потрібно ввести необхідні параметри, після чого по черзі будуються графіки Ua(wt), UL(wt), U(wt), I(wt), P(wt), QL(wt) з відповідними пояснюючими написами.

    При натисканні 2 – будується електричне коло активного струму з активним опором та індуктивністю.

    Третя опція – інформація про автора.

    Лістінг програми:

    # include

    # include

    # include

    # include

    # include

    # include

    # 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);

    puts("Input r:");

    scanf("%f", &r);

    Z=sqrt(r*r+Xl*Xl);

    cos_fi=r/Z;

    sin_fi=Xl/Z;

    checkgr();

    moveto(0, 240);

    setcolor(6);

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

    { Ua=Um*cos_fi*sin(wt);

    lineto(wt, Ua+240);

    }

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

    getch();

    cleardevice();

    moveto(0, 240);

    setcolor(4);

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

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

    lineto(wt, Ul+240);

    }

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

    getch();

    cleardevice();

    moveto(0, 240);

    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();

    cleardevice();

    moveto(0, 240);

    setcolor(6);

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

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

    lineto(wt, Ql+240);

    }

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

    getch();

    cleardevice();

    restorecrtmode();

    break;

    case '2':

    checkgr();

    setlinestyle(0, 1, 3);

    rectangle(80, 80, 560, 400);

    bar(150, 55, 250, 105);

    setcolor(0);

    line(325, 80, 475, 80);

    line(80, 200, 80, 300);

    setcolor(15);

    arc(340, 80, 0, 180, 15);

    arc(370, 80, 0, 180, 15);

    arc(400, 80, 0, 180, 15);

    arc(430, 80, 0, 180, 15);

    arc(460, 80, 0, 180, 15);

    line(80, 200, 50, 200);

    line(80, 300, 50, 300);

    circle(47, 200, 3);

    circle(47, 300, 3);

    line(52, 195, 42, 205);

    line(52, 295, 42, 305);

    setcolor(RED);

    outtextxy(200, 75, "R");

    outtextxy(400, 75, "L");

    outtextxy(300, 130, "U");

    outtextxy(170, 110, "U_a");

    outtextxy(370, 110, "U_L");

    setlinestyle(0, 1, 1);

    setcolor(7);

    line(80, 120, 560, 120);

    line(80, 140, 560, 140);

    line(300, 120, 300, 80);

    getch();

    restorecrtmode();

    break;

    case '3':

    int c=1;

    while(!kbhit())

    { clrscr();

    textcolor(c);

    puts("DONE BY:");

    cputs(" Chaika Ihornr");

    textcolor(c);

    cputs(" ACTP-12nr");

    cputs(" Faculty AM&CISnr");

    puts("CHECKED UP:");

    cputs(" Pastushenko V. Y.");

    textcolor(15);

    delay(80);

    c++;

    if(c==15) c=1;

    }

    getch();

    break;

    case '0':

    exit(0);

    case 27:

    exit(0);

    default:

    puts("nWrong number!..");

    while(!kbhit());

    }

    goto MENU;

    }

    }

    void checkgr()

    {

    int driver=DETECT, ecode, gmode;

    initgraph(&driver, &gmode, "");

    ecode=graphresult();

    if (ecode!=grOk)

    { printf("Graphics initialisation error:n%sn", grapherrormsg(ecode));

    puts ("Press any key to proceed...");

    getch();

    exit(1);

    }

    }

    Приклад.

    Введемо такі значення:

    Um=20, Im=30, XL=40, r=50. Тоді матимемо такі графіки Ua та UL:

    Висновок.

    Завдяки цій роботі я закріпив здобуті теоретичні навички з курсу "Програмування та алгоритмічні мови", навчився застосовувати їх при вирішенні проблем різного плану.

    Використана література:

    Вартабедян В.А. Загальна електротехніка К.,"Вища школа",1971 р. 354 с.

    Ця курсова робота люб'язно надана Олександром Подранецьким

  • Loading...

     
     

    Цікаве