Завдання 3
До лінії
трифазного струму промислової частоти
(рис.
3) напругою 380/220 В з допомогою вимикачів
приєднуються споживачі:
- лампи розжарювання
потужністю
напругою 220 В;
- індукційні котушки
з повними опорами
,
для яких фазний кут зсуву
заданий в табл. 1.
Вважаючи рубильники ввімкненими відповідно до табл. 1 необхідно:
- накреслити спрощені схеми;
- визначити лінійні струми, що споживають споживачі, з’єднані трикутником і зіркою;
- накреслити окремо векторні діаграми для споживачів, з’єднаних зіркою, для споживачів, що з’єднані трикутником, і суміщену векторну діаграму;
Рис.3.
1.Аналітично розв’язати задачу .
2.Написати програму до задачі (мовою програмування C++), яка б забезпечувала:
а) розрахунок лінійних струмів, що споживають споживачі, з’єднані трикутником і зіркою;
б)побудову векторних діаграм для споживачів, з’єднаних зіркою та для споживачів, що з’єднані трикутником.
Створити зручний інтерфейс для введення даних.
3. Скласти блок-схему до створеної програми.
4. Змоделювати таку трифазну систему з допомогою програми Electronik Workbench.
5. Записати результати всіх розрахунків у таблиці, зробити висновки.
Варіант
Один. шифру |
Ввімкнені вимикачі |
Десятки шифру |
град |
Вт |
Вт |
Вт |
|
0 |
SA1 ,SA2, SA3, SA4, SA5. |
5 |
45 |
1100 |
2200 |
1100 |
|
3.2. Аналітичний розв’язок
А
А
А
.
In=2,5 - j12,98 А = 13,22е79,1j А
А
А
А
3.3 Програма в С++
#include<graphics.h>
#include<conio.h>
#include<math.h>
#include<stdlib.h>
#include<stdio.h>
#include<iostream.h>
#include<string.h>
#define k 57.29
void main( )
{
int Pa,Pb,Pc,fi,xc,yc,Z;
clrscr();
cout<<"Vvedit' Pa: ";
cin>>Pa;
cout<<"Vvedit' Pb: ";
cin>>Pb;
cout<<"Vvedit' Pc: ";
cin>>Pc;
float Ia1a,Ia1b,Ib1a,Ib1b,Ic1a,Ic1b;
Ia1a=(Pa/220)*cos(0);Ia1b=(Pa/220)*sin(0);
Ib1a=(Pb/220)*cos(120/k);Ib1b=(Pb/220)*sin(120/k);
Ic1a=(Pc/220)*cos(-120/k);Ic1b=(Pc/220)*sin(-120/k);
cout<<"\n";
cout<<"Ia*= "<<Ia1a<<"+"<<"j("<<Ia1b<<")"<<"\n";
cout<<"Ib*= "<<Ib1a<<"+"<<"j("<<Ib1b<<")"<<"\n";
cout<<"Ic*= "<<Ic1a<<"+"<<"j("<<Ic1b<<")"<<"\n";
cout<<"\n";
cout<<"natusnit' ''Enter'':";
getch();
int gdriver=DETECT,gmode,errorcode;
initgraph(&gdriver,&gmode,"c:\\bcpp\\bgi");
errorcode=graphresult( );
if(errorcode !=grOk)
{
printf("error: %s \n" ,grapherrormsg (errorcode));
printf("error");
getch( );
exit(1);
}
xc=getmaxx()/2;
yc=getmaxy()/2;
setcolor(15);
rectangle(10,10,630,470);
outtextxy(30,30,"Mashtab: I-1:0.1");
setcolor(15);
line(xc,yc,xc,yc-200); outtextxy(xc+10,yc-200-10,"+");
line(xc,yc,xc,yc+200); outtextxy(xc+10,yc+200-10,"-");
line(xc,yc,xc-300,yc); outtextxy(xc-260-10,yc+10,"-j");
line(xc,yc,xc+300,yc); outtextxy(xc+260+10,yc+10,"+j");
setcolor(14);
line(xc,yc,xc-Ia1b*10,yc-Ia1a*10);outtextxy(xc-Ia1b*10,yc-Ia1a*10,"Ia*");
line(xc,yc,xc+Ib1b*10,yc-Ib1a*10);outtextxy(xc+Ib1b*10,yc-Ib1a*10,"Ib*");
line(xc,yc,xc+Ic1b*10,yc-Ic1a*10);outtextxy(xc+Ic1b*10,yc-Ic1a*10,"Ic*");
while(getch()==0);
closegraph( );
cout<<"Vvedit' fi: ";
cin>>fi;
cout<<"Vvedit' Z: ";
cin>>Z;
float Iaba,Iabb,Ibca,Ibcb,Icaa,Icab,Ib2a,Ib2b;
Iaba=(380/Z)*cos((-30-fi)/k);Iabb=(380/Z)*sin((-30-fi)/k);
Ibca=(380/Z)*cos((90-fi)/k);Ibcb=(380/Z)*sin((90-fi)/k);
Icaa=(380/Z)*cos((-210-fi)/k);Icab=(380/Z)*sin((-210-fi)/k);
cout<<"\n";
cout<<"Iab‑= "<<Iaba<<"+"<<"j("<<Iabb<<")"<<"\n";
cout<<"Ibc‑= "<<Ibca<<"+"<<"j("<<Ibcb<<")"<<"\n";
cout<<"Ica‑= "<<Icaa<<"+"<<"j("<<Icab<<")"<<"\n";
cout<<"\n";
cout<<"Natusnit' ''Enter'':";
getch();
initgraph(&gdriver,&gmode,"c:\\bcpp\\bgi");
errorcode=graphresult( );
if(errorcode !=grOk)
{
printf("error: %s \n" ,grapherrormsg (errorcode));
printf("error");
getch( );
exit(1);
}
xc=getmaxx()/2;
yc=getmaxy()/2;
setcolor(15);
rectangle(10,10,630,470);
outtextxy(30,30,"Mashtab: I-1:0.1");
setcolor(15);
line(xc,yc,xc,yc-200); outtextxy(xc+10,yc-200-10,"+");
line(xc,yc,xc,yc+200); outtextxy(xc+10,yc+200-10,"-");
line(xc,yc,xc-300,yc); outtextxy(xc-260-10,yc+10,"-j");
line(xc,yc,xc+300,yc); outtextxy(xc+260+10,yc+10,"+j");
setcolor(14);
line(xc,yc,xc+Iabb*10,yc-Iaba*10);outtextxy(xc+Iabb*10,yc-Iaba*10,"Iab‑");
line(xc,yc,xc+Ibcb*10,yc-Ibca*10);outtextxy(xc+Ibcb*10,yc-Ibca*10,"Ibc‑");
line(xc,yc,xc+Icab*10,yc-Icaa*10);outtextxy(xc+Icab*10,yc-Icaa*10,"Ica‑");
while(getch()==0);
closegraph( );
}
Результати.
