Laman

9 Logo yang Ga' Sengaja Dibuat Tetapi Memiliki Beberapa Tafsir yang Bikin Anda Ketawa

Mumpung lagi libur kuliah nih sobat Volterz, gue mw kasih info yang menarik nih. Iseng-iseng  browsing ternyata dapat tekwan yang bikin sobat cengir kuda sampai-sampai ngakak. Ini Beberapa gambar saya ambil dari boredpanda dan dari logopedia. Beberapa Logo awalnya gue ngga begitu paham, ujung-ujungnya setelah dilihat, diraba,diterawang (kayak iklannya uang indonesia) jadi sadar memang ini termasuk logo yang sengaja dibuat atau tidak, ternyata bikin gue ngakak. Cekidot.....

1. Logo Locum. Locum merupakan sebuah perusahaan manajemen property asal swedia. Yang membuat logo ini jelek adalah huruf o yang diganti dengan logogram simbol cinta. Orang yang salah baca bisa membaca
 logo jelek ini I Love Cum






2. Logo OCG
 (Office government commerce). Logo ini juga bikin ngakak. Misal Logo ini diputar 90 derajat ke searah jarum jam. :S



3. Logo A-Style
Logo ini jelek
 karena bentuknya yang aga ngga senonoh. A-Style Sendiri adalah merk fashion di Italia yang telah ada sejak tahun 1989.


4. Logo Clinical Dental
Hahaha.. Silahkan diperhatikan kenapa
 logo ini jelek dan gagal total.



5. Logo Junior Jazz Dance Classes
Pertama lihat
 logo ini, jujur ngga paham bener jeleknya. Yang saya lihat cuma sepasang cewek dan cowok yang sedang menari. Eh pas saya zoom out baru geleng-geleng kepala. Ko bisa ya yang buat logo jelek ini ngga sadar.




6.  Logo Kudawara Pharmacy
Silahkan ditemukan apa yang membuat
 logo kudawara ini jelek :P


7. Logo Kidsexchange

Logo ini jelek karena ngga ada pemisahan huruf sehingga bisa multi tafsir kalau dibaca.





8. Logo Arlington Pediatric Center
Logo
 ini setelah saya check websitenya (www.arlpedcen.org) ternyata sudah diganti. Kurang tahu apakah logo tersebut memang strategi pemasaran atau memang logo yang gagal.



9. Logo The Computer Doctors
Wkwkwk yang bikin lucu adalah huruf u di
 logo tersebut diganti sama mouse tetapi gambar mousenya aneh -,-. Apa ngga ada yang lain yang lebih bagus ya.


Gimana sahabat Volterz? Klo loe nggak cengir itu tandanya pikiran anda masih positif dan belum terpengaruh. Jika anda ternyata nyengir berarti anda mempunyai pikiran .............. yang memiliki pandangan luas terhadap beberapa bentuk yang aneh.
sumber : boredpanda, logopedia
Read more >>

SOAL BILANGAN KOMPLEK 3


disp ('soal 11,tentukan nilai turunan pada persamaan berikut')
disp ('A.dik :z = 2*i,cari f(z) = 3*(z)^3+ 2*z')
disp ('jawab:')
z1=0+2*i
f=3*(z1)^3+ 2*z1
disp ('B.dik :z = 1+i,cari f(z) = 1/2*(z)^4')
disp ('jawab:')
z2=1+i
f=1/2*(z2)^4
disp ('C.dik :z = i/2,cari f(z) =((z)^2-1)^2')
disp ('jawab:')
z3=0+0.5i
f=((z3)^2-1)^2
disp ('D.dik :z = 2*i,cari f(z) =(z-1)/z*2')
disp ('jawab:')
z4=0+2i
f=(z4-1)/z4*2


disp ('soal 12,tentukan nilai dari fungsi – fungsi pada persamaan berikut:')
disp ('A. dik f(z) = exp(3 + 2*pi*i')
disp ('jawab:')
f=exp(3+ 2*pi*i)
disp ('B. dik f(z) = exp(-i')
disp ('jawab:')
f=exp(-i)
disp ('C. dik f(z) = exp(-3 - 4*i)')
disp ('jawab:')
f=exp(-3-4*i)
disp ('D. dik f(z) = exp(-3 + 4*i')
disp ('jawab:')
f=exp(-3+4*i)


disp ('soal 13,tentukan nilai dari fungsi – fungsi pada persamaan   berikut:')
disp ('dik A. f(z) = real(exp(3 + 2*pi*i))')
disp ('jawab :')
f=real(exp(3 + 2*pi*i))
disp ('dik B. f(z) = real(exp(-i))')
disp ('jawab :')
f=real(exp(-i))
disp ('dik C. f(z) = real(exp(-3 - 4*i))')
disp ('jawab :')
f=imag(exp(-3-4*i))
disp ('dik D. f(z) = imag(exp(-3 + 4*i))')
disp ('jawab :')
f=imag(exp(-3+4*i))


disp ('soal 14,tentukan nilai dari fungsi – fungsi pada persamaan berikut:')
disp ('dik A=cos(3 + i*4)')
disp ('dik B=cos(6 - i*8)')
disp ('dik C=sin(2*i)')
disp ('dik D=sin(-2 - i*3)')
disp ('jawab:')
A=cos(3 + i*4)
B=cos(6 + i*8)
C=sin(2*i)
D=sin(-2 - i*3)


disp ('soal 15,tentukan nilai dari fungsi-fungsi pada persamaan berikut:')
disp ('dik : A=cosh(3 + i*4)')
disp ('dik : B=cosh(6 - i*8)')
disp ('dik : C=sinh(i*2)')
disp ('dik : D=cosh(-2 - i*3)')
disp ('jawab :')
A=cosh(3 + i*4)
B=cosh(6 + i*8)
C=sinh(i*2)
D=cosh(-2-i*3)




Read more >>

SOAL BILANGAN KOMPLEK 2


SOAL REV
disp('soal 5,nyatakan bilangan kompleks pada persamaan bentuk dalam bentuk rectangular berikut: ')
disp('A.dik Z1 = 4 sudut 90derajat')
disp('B.dik Z2 =5 sudut 135derajat' )
disp('C.dik Z3 =pi sudut 45derajat' )
disp('D.dik Z4 =50 sudut 120derajat' )
disp('jawab:')
Z1=complex(4*cosd(90),4*sind(90))
Z2=complex(5*cosd(135),5*sind(135))
Z3=complex(pi*cosd(45),pi*sind(45))
Z4=complex(50*cosd(120),50*sind(120))


disp('soal6,,hitung penjumlahan dan pengurangan bilangan kompleks pada persamaan dalam bentuk kutub berikut:')
disp ('A.dik z1 = 4 sudut 75derajat + 5 sudut 135derajat')
disp ('B.dik z2 = 15 sudut 135derajat + 10 sudut 105derajat')
disp ('C.dik z3 = pi sudut 45derajat + 0.5 sudut 75derajat')
disp ('D.dik z4 = 50 sudut 120derajat + 25 sudut 60derajat')
disp('jawab:')
z1_a=cosd(75)*4;
z1_b=sind(75)*4;
z1_c=cosd(135)*5;
z1_d=sind(135)*5;
z1_1=complex(z1_a,z1_b)+ complex(z1_c,z1_d)
z1a=real(z1_1);
z1b=imag(z1_1);
r=sqrt(z1a^2+z1b^2)
sudut=atand(z1b/z1a)
disp(['hasil dari z1 = 4?75 + 5?135 adalah ',num2str(r)]),disp(['sudut ',num2str(sudut)])
disp('------------------------------------------')
z2_a=cosd(135)*15;
z2_b=sind(135)*15;
z2_c=cosd(105)*10;
z2_d=sind(105)*10;
z2_1=complex(z2_a,z2_b)+ complex(z2_c,z2_d)
z2a=real(z2_1);
z2b=imag(z2_1);
r=sqrt(z2a^2+z2b^2)
sudut=atand(z2b/z2a)
disp(['hasil dari z2 = 15?135 + 10?105 adalah ',num2str(r)]),disp(['sudut ',num2str(sudut)])
disp('------------------------------------------')
z3_a=cosd(45)*pi;
z3_b=sind(45)*pi;
z3_c=cosd(75)*0.5;
z3_d=sind(75)*0.5;
z3_1=complex(z3_a,z3_b)- complex(z3_c,z3_d)
z3a=real(z3_1);
z3b=imag(z3_1);
r=sqrt(z3a^2+z3b^2)
sudut=atand(z3b/z3a)
disp(['hasil dari z3 = pi?45 - 0.5?75 adalah ',num2str(r)]),disp(['sudut ',num2str(sudut)])
disp('------------------------------------------')
z4_a=cosd(120)*50;
z4_b=sind(120)*50;
z4_c=cosd(60)*25;
z4_d=sind(60)*25;
z4_1=complex(z4_a,z4_b)- complex(z4_c,z4_d)
z4a=real(z4_1);
z4b=imag(z4_1);
r=sqrt(z4a^2+z4b^2)
sudut=atand(z4b/z4a)
disp(['hasil dari z4 = 50?120 - 25?60 adalah ',num2str(r)]),disp(['sudut ',num2str(sudut)])


clear all
clc
disp('soal 7,hitung perkalian dan pembagian kompleks dalam bentuk kutub pada persamaan (92) s/d (95) berikut:')
disp ('A.Za = 10 sudut 37derajat * 4 sudut322derajat')
disp ('B.Zb = pi sudut 137derajat * 0.5 sudut22derajat')
disp ('C.Zc = 3*pi sudut 167derajat / 5 sudut 20derajat')
disp ('D.Zd = 10 sudut 37derajat / 4 sudut322derajat')
r1a=10;
r1b=4;
theta1a=37;
theta1b=322;
r_a=r1a*r1b
theta_a=theta1a+theta1b
disp(['hasil dari za = 10?37 * 4?322 adalah ',num2str(r_a)]),disp(['sudut ',num2str(theta_a)])
disp('------------------------------------------')
r2a=pi;
r2b=0.5;
theta2a=137;
theta2b=22;
r_b=r2a*r2b
theta_b=theta2a+theta2b
disp(['hasil dari zb = pi?137 * 0.5?22 adalah ',num2str(r_b)]),disp(['sudut ',num2str(theta_b)])
disp('------------------------------------------')
r3a=3*pi;
r3b=5;
theta3a=167;
theta3b=20;
r_c=r3a/r3b
theta_c=theta3a-theta3b
disp(['hasil dari zc = 3(pi)?167 / 5?20 adalah ',num2str(r_c)]),disp(['sudut ',num2str(theta_c)])
disp('------------------------------------------')
r4a=10;
r4b=4;
theta4a=37;
theta4b=322;
r_d=r4a/r4b
theta_d=theta4a-theta4b
disp(['hasil dari zd = 10?37 / 4?322 adalah ',num2str(r_d)]),disp(['sudut ',num2str(theta_d)])


disp ('soal 8,selesaikan operasi bilangan kompleks pada persamaan berikut:')
disp('dik z^2 -(5+i)z+(8+i)=0')
%persamaan ax^2+bx+c, dimana:
a=1;     %harga a
b=-(5+1i);     %harga b
c=8+1i;    %harga c
%Deskripsi dan Perhitungan
%------------------------------
d=b^2-4*a*c;       %D=diskriminan
z1=(-b+sqrt(d))/(2*a) %Akar z1
z2=(-b-sqrt(d))/(2*a) %Akar z2
disp('dik z^2- 3z + (3 + i) = 0')
%persamaan ax^2+bx+c, dimana:
a1=1;     %harga a
b1=-3;     %harga b
c1=3+1i;    %harga c
%Deskripsi dan Perhitungan
%------------------------------
d1=b1^2-4*a1*c1;       %D=diskriminan
z_1=(-b1+sqrt(d1))/(2*a1) %Akar z1
z_2=(-b1-sqrt(d1))/(2*a1) %Akar z2
disp ('dik C=sqrt(3+i*4)')
disp ('jawab:')
C=sqrt(3+i*4)
disp ('dik D=nthroot(2*i, 8)')
disp ('jawab:')
D=(0+2*i)^(1/8)


disp ('soal 9,Selesaikan operasi bilangan kompleks pada persamaan berikut:')
disp ('A=z1^2-2*z2+(8 + i)')
disp ('B=2*(z1^2) - 3*(z2) + (3 + i )= 0')
disp ('C=sqrt(z1+z2)')
disp ('D=akar pangkat 3 dari(z1*z2)')
disp ('dik :')
z1=3+2*i
z2=2-5*i
disp ('jawab:')
A=z1^2-2*z2+(8 + i)
B=2*(z1^2)-3*(z2)+(3 + i)
C=sqrt(z1+z2)
zd=z1*z2;
D=zd^(1/3)


disp ('soal no 10,Selesaikan operasi bilangan kompleks pada persamaan berikut:')
disp ('A. f(z)=3*(z1)^2 + z1')
disp ('B. f(z)=3*(z2)^2 + z2')
disp ('C. f(z)=3*(z3)^2 + z3')
disp ('D. f(z)=1/2*(z1)^2')
disp ('E. f(z)=1/2*(z2)^2')
disp ('F. f(z)=1/2*(z3)^2')
disp ('G. f(z)=(z1+1)/(z1-1)')
disp ('H. f(z)=(z2+1)/(z2-1)')
disp ('I. f(z)=(z3+1)/(z3-1)')

disp ('dik :')
z1=2+i*5
z2=i*3
z3=-4+i*2
disp ('jawab:')
f_A=3*z1^2+z1
f_B=3*(z2)^2 + z2
f_C=3*(z3)^2 + z3
f_D=1/2*(z1)^2
f_E=1/2*(z2)^2
f_F=1/2*(z3)^2
f_G=(z1+1)/(z1-1)
f_H=(z2+1)/(z2-1)
f_I=(z3+1)/(z3-1)






Read more >>

SOAL BILANGAN KOMPLEK 1


disp('---------------------');
disp('SOAL 1')
disp('Soal Bilangan Komplek')
disp('dibuat Oleh : Mashudan Kurniawan')
disp('Hari/tanggal: sabtu/13 Okt 2012')
disp('---------------------------------')
%----------------------------------------
disp('soal 1,nyatakan bilangan kompleks pada persamaan berikut:')
disp('a. z1=3+i4')
disp('b. z2=3-i4')
disp('c. z3=-3+i4')
disp('d. z4=-3-i4')
disp('jawab: ')
a=3;
b=4;
z1=complex(a,b)
z2=complex(a,-b)
z3=complex(-a,b)
z4=complex(-a,-b)


disp('soal 2,jika z1 =3 + j4 dan z2 = 8 + j6 hitung operasi aritmetik pada persamaan berikut')
disp('a. za = z1+ z2')
disp('b. zb = z1- z2')
disp('c. zc = z1z2')
disp('d. zd = z1/z2')
disp('dik :')
z1=3+j*4;
z2=8+j*6;
disp('jawab:')
za=z1+z2
zb=z1-z2
zc=z1*z2
zd=z1/z2


disp('soal 3,jika z1 =3 + i4, z2 = 8 + i6 dan z3 = 12 + i13 tentukan')
disp ('a.Real z1')
disp ('b.Real z2')
disp ('c.Real Z3')
disp ('d.ZA=re(z1+z3)')
disp ('e.ZB=im(z1-z2)')
disp ('f.ZC=re(z1*z2)')
disp ('g.ZD=im(z1/z3)')
disp('jawab:')
z1=3+i*4;
z2=8+i*6;
z3=12+i*13;
realZ1=real(z1)
realZ2=real(z2)
realZ3=real(z3)
za=real(z1+z3)
zb=imag(z1-z2)
zc=real(z1*z2)
zd=imag(z1/z3)

RECTANGURAL TO POLAR

disp('soal 4,Nyatakan bilangan kompleks pada persamaan bentuk dalam bentuk kutub :')
disp('z1=1+i*4')
disp('z2=1-i*4')
disp('z3=-1+i*4')
disp('z4=-1-(i*4)')
disp('jawab:')
z1=1+i*4
r1=sqrt((1)^2+(4)^2)
sudut_Z1=atand(imag(z1)/real(z1))
disp('-----------------------------')
z2=1-i*4
r2=sqrt((1)^2+(-4)^2)
sudut_Z2=atand(imag(z2)/real(z2))
disp('-----------------------------')
z3 =-1+i*4
r3=sqrt((-1)^2+(4)^2)
sudut_Z3=atand(imag(z3)/real(z3))
disp('-----------------------------')
z4 =-1-i*4
r4=sqrt((-1)^2+(-4)^2)
sudut_Z4=atand(imag(z4)/real(z4))

POLAR TO RECTANGULAR

disp('soal 5,nyatakan bilangan kompleks pada persamaan bentuk dalam bentuk rectangular berikut: ')
disp('A.dik Z1 = 4 sudut 90derajat')
disp('B.dik Z2 =5 sudut 135derajat' )
disp('C.dik Z3 =pi sudut 45derajat' )
disp('D.dik Z4 =50 sudut 120derajat' )
r1=4;
theta1=90;
r2=5;
theta2=135;
r3=pi;
theta3=45;
r4=50;
theta4=120;
%bentuk rectangular
z1_a=cosd(theta1)*r1;
z1_b=sind(theta1)*r1;
z1=complex(z1_a,z1_b)
z2_a=cosd(theta2)*r2;
z2_b=sind(theta2)*r2;
z2=complex(z2_a,z2_b)
z3_a=cosd(theta3)*r3;
z3_b=sind(theta3)*r3;
z3=complex(z3_a,z3_b)
z4_a=cosd(theta4)*pi;
z4_b=sind(theta4)*pi;
z4=complex(z4_a,z4_b)






Read more >>

TRANSFORMASI BINTANG-DELTA


clear all
clc
disp('***************************************')
disp('     TRANSFORMASI BINTANG-DELTA        ')
disp('***************************************')
disp('1.Transformasi Bintang ke Delta')
disp('2.Transformasi Delta ke Bintang')
disp('3.selesai')
disp('---------------------------------------')
pilih=input('Silahkan pilih pilhan Anda : ');
disp('---------------------------------------')
while pilih ~=3
switch pilih
case 1
disp('Transformasi bintang ke delta')
R1=input('masukan nilai R1(ohm)= ');    
R2=input('masukan nilai R2(ohm)= ');    
R3=input('masukan nilai R3(ohm)= ');
disp('---------------------------------------')
Ra=((R1*R2)+(R2*R3)+(R3*R1))/R1;
Rb=((R1*R2)+(R2*R3)+(R3*R1))/R2;
Rc=((R1*R2)+(R2*R3)+(R3*R1))/R3;
disp('hasil transformasi bintang ke delta')
disp(['RA adalah = ',num2str(Ra),' ohm'])
disp(['RB adalah = ',num2str(Rb),' ohm'])
disp(['RC adalah = ',num2str(Rc),' ohm'])
disp('***************************************')
pause;
return
disp('   ')
case 2
disp('Transformasi delta ke bintang')
Ra=input('masukan nilai RA(ohm)= ');    
Rb=input('masukan nilai RB(ohm)= ');    
Rc=input('masukan nilai RC(ohm)= ');
disp('---------------------------------------')
R1=(Rb*Rc)/(Ra+Rb+Rc);
R2=(Ra*Rc)/(Ra+Rb+Rc);
R3=(Ra*Rb)/(Ra+Rb+Rc);
disp('hasil transformasi delta ke bintang')
disp(['R1 adalah = ',num2str(R1),' ohm'])
disp(['R2 adalah = ',num2str(R2),' ohm'])
disp(['R3 adalah = ',num2str(R3),' ohm'])
disp('***************************************')
return
end
end

Read more >>

MEMBUAT MENU PILIHAN PADA MATLAB 2008


clear all
clc
disp('***************************************')
disp('            MENU PILIHAN               ')
disp('***************************************')
disp('Nama         = MASHUDAN KURNIAWAN      ')
disp('NIM          = 0610 3031 0851          ')
disp('Kelas        = 5 ELB                   ')
disp('Hari/Tanggal = Sabtu / 20 Oktober 2012 ')
disp('---------------------------------------')
disp('silahkan pilih soal di bawah ini       ')
disp('---------------------------------------')
disp('PILIHAN SOAL');
disp('---------------------------------------')
disp('1. Soal 1')
disp('2. Soal 2')
disp('3. Soal 3')
disp('4. Soal 4')
disp('5. Soal 5')
disp('6. Soal 6')
disp('7. Soal 7')
disp('8. Soal 8')
disp('9. Soal 9')
disp('10. Soal 10')
disp('11. Soal 11')
disp('12. Soal 12')
disp('13. Soal 13')
disp('14. Soal 14')
disp('15. Soal 15')
disp('16. Selesai')
disp('---------------------------------------')
pilih=input('pilihan Anda (1 s/d 15):....');
disp('---------------------------------------')
while pilih ~=4
switch pilih
case 1
disp('soal 1. Dengan menggunakan Matlab,nyatakan bilangan kompleks pada persamaan berikut:')
disp('a. z1=3+i4')
disp('b. z2=3-i4')
disp('c. z3=-3+i4')
disp('d. z4=-3-i4')
disp('jawab: ')
a=3;
b=4;
z1=complex(a,b);
realz1=real(z1);
imagz1=imag(z1);
z2=complex(a,-b);
realz2=real(z2);
imagz2=imag(z2);
z3=complex(-a,b);
realz3=real(z3);
imagz3=imag(z3);
z4=complex(-a,-b);
realz4=real(z4);
imagz4=imag(z4);
disp(['a. Real Z1 = ',num2str(realz1)])
disp(['Imaginer Z1 = ',num2str(imagz1)])
disp(' ')
disp(['b. Real Z2 = ',num2str(realz2)])
disp(['Imaginer Z2 = ',num2str(imagz2)])
disp(' ')
disp(['c. Real Z3 = ',num2str(realz3)])
disp(['Imaginer Z3 = ',num2str(imagz3)])
disp(' ')
disp(['d. Real Z4 = ',num2str(realz4)])
disp(['Imaginer Z4 = ',num2str(imagz4)])
pause;
return
%
case 2
disp('soal 2.Dengan menggunakan Matlab,jika z1 =3 + j4 dan z2 = 8 + j6 hitung operasi aritmetik pada persamaan berikut')
disp('a. za = z1 + z2')
disp('b. zb = z1 - z2')
disp('c. zc = z1*z2')
disp('d. zd = z1/z2')
disp('jawab:')
z1=complex(3,4);
z2=complex(8,6);
za=z1+z2;
zb=z1-z2;
zc=z1*z2;
zd=z1/z2;
disp(['Penjumlahan dari : z1 + z2 = ',num2str(za)])
disp(' ')
disp(['Pengurangan dari : z1 - z2 = ',num2str(zb)])
disp(' ')
disp(['Perkalian dari : z1 * z2 = ',num2str(zc)])
disp(' ')
disp(['Pembagian dari : z1 / z2 = ',num2str(zd)])
return
%
case 3
disp('soal 3.Dengan menggunakan Matlab,jika z1 =3 + i4, z2 = 8 + i6 dan z3 = 12 + i13 tentukan:')
disp ('a.Real z1')
disp ('b.Real z2')
disp ('c.Real Z3')
disp ('d.ZA=re(z1+z3)')
disp ('e.ZB=im(z1-z2)')
disp ('f.ZC=re(z1*z2)')
disp ('g.ZD=im(z1/z3)')
disp('jawab:')
z1=complex(3,4);
z2=complex(8,6);
z3=complex(12,13);
realZ1=real(z1)
realZ2=real(z2)
realZ3=real(z3)
za=real(z1+z3)
zb=imag(z1-z2)
zc=real(z1*z2)
zd=imag(z1/z3)
return
end
end

Read more >>

BEBERAPA PROGRAM MATLAB


Report Pemakaian Energi Listrik

jam=0:1:23;
daya=[50 50 50 50 50 50 75 100 125 150 175 210 245 250 250 270 275 280 370 380 380 350 125 50];
plot(jam,daya,'r')
title('Report Pemakaian Energi Listrik')
xlabel('Waktu (jam)')
ylabel('Daya (MW)')

GRAFIK y=2x^2+5x-7

clear all
clc
x=-6:1:6;
y=(2*x.^2)+(5*x)-7;
plot(x,y,'r')
title('GRAFIK y=2x^2+5x-7')
xlabel('SUMBU X')
ylabel('SUMBU Y')

MEMBUAT TABLE

clear all
clc
disp ('**********************************************************')
disp ('***      STUDI PENGASUTAN MOTOR INDUKSI 3 FASA         ***')
disp ('***           DENGAN STARTER STAR / DELTA              ***')
disp ('**********************************************************')
disp ('NAMA              = MASHUDAN KURNIAWAN                    ')
disp ('NIM               = 061030310851                          ')
disp ('KELAS             = 5 ELB                                 ')
disp ('MATA KULIAH       = PEMROGRAMAN KOMPUTER                  ')
disp ('DOSEN PEMBIMBING  = ANTON FIRMANSYAH,S.T.,M.T.            ')
disp ('HARI/TANGGAL      = SABTU,   DESEMBER 2012                ')
disp ('**********************************************************')
disp('  ')
disp('ANALISA DATA')
disp('Dari hasil percobaan,didapat data sebagai berikut:')
disp ('----------------------------------------------------------')
disp('  ')
disp('***********************************************************')
disp('** Pengukuran tanpa beban dengan menggunakan power meter **')
disp('***********************************************************')
teganganline=355;
arusrunningY=0.31;
arusrunningA=1.12;
disp(['*  tegangan line                   |        ',num2str(teganganline),'V         *'])
disp(['*  arus running hubugan star       |        ',num2str(arusrunningY),'A         *'])
disp(['*  arus running hubugan delta      |        ',num2str(arusrunningA),'A         *'])
disp('***********************************************************')
disp('===========================================================')
disp(' ')
disp('*********************************************')
disp('** Arus running hubungan bintang per phasa **')
disp('*********************************************')
af1=0.37;
af2=0.29;
af3=0.28;
disp(['*   arus fasa 1    |      ',num2str(af1),'A             *'])
disp(['*   arus fasa 2    |      ',num2str(af2),'A             *'])
disp(['*   arus fasa 3    |      ',num2str(af3),'A             *'])
disp('*********************************************')
disp('===========================================================')
disp(' ')
disp('*********************************************')
disp('**  Arus running hubungan Delta per phasa  **')
disp('*********************************************')
ad1=1.19;
ad2=1.05;
ad3=1.04;
disp(['*   arus fasa 1    |      ',num2str(ad1),'A             *'])
disp(['*   arus fasa 2    |      ',num2str(ad2),'A             *'])
disp(['*   arus fasa 3    |      ',num2str(ad3),'A             *'])
disp('*********************************************')
disp('===========================================================')
disp(' ')
disp('********************************************')
disp('**Spesifikasi motor induksi yang digunakan**')
disp('********************************************')
disp('* Type         |    SE 2662-5G.VDE 0530    *')
disp('* Voltage      |    380 Volt               *')
disp('* Imax         |    2.5 A                  *')
disp('* Daya         |    1 KW                   *')
disp('* Cos          |    0.83                   *')
disp('* rpm          |    2780                   *')
disp('* Frekuensi    |    50 Hz                  *')
disp('* R            |    20 ohm                 *')
disp('* IP           |    20                     *')
disp('********************************************')
disp('==========================================================')
v=380;
Im=2.5;
f=50;
P=1000;
cos=0.83;
r=20;
disp('----------------------------------------------------------')
disp('-- Perhitungan arus start awal yang terjadi pada saat   --')
disp('--               hubungan star delta                    --')
disp('----------------------------------------------------------')
disp('  ')
disp('I nominal ')
in=P/(sqrt(3)*v*cos);
disp('         __')
disp(['In= P/ / 3.V Line.cos q = ',num2str(in),' A'])
disp('  ')
disp('----------------------------------------------------------')
disp(' ')
disp('========================================')
disp('== harga arus pada saat starting pada ==')
disp('==    hubungan bintang dan delta      ==')
disp('========================================')
disp('= hubungan bintang  |  hubungan delta  =')
disp('========================================')
iy=1.8*in;
id=3*iy;
disp(['     ',num2str(iy),'A              ',num2str(id),'A'])
disp('========================================')
disp(' ')
disp('-----------------------------------------------------------')
disp(' ')
disp('Tabel Perhitungan daya total motor dalam keadaan ')
disp('tanpa beban jika motor dalam hubungan star dan delta')
disp(' ')
r=20;
z=v/Im;
%disp('Z = V/I')
%disp(['  = ',num2str(z),'ohm'])
disp('************************************************************************')
disp('** Hasil perhitungan ** Pada hubungan bintang  |  Pada hubungan delta **')
disp('************************************************************************')
efasa=v/sqrt(3);
ifasa=efasa/z;
C=r/z;
ptot=v*ifasa*C*sqrt(3);
%------------
efasad=v;
ifasad=v/z;
ili=ifasad*sqrt(3);
Cd=r/z;
ptotd=v*ili*Cd*sqrt(3);
disp(['    E fasa                   ',num2str(efasa),' V              ',num2str(efasad),' V'])
disp(['    I fasa                   ',num2str(ifasa),' A                ',num2str(ifasad),' A'])
disp(['    Cos phi                  ',num2str(C),'                 ',num2str(Cd)])
disp(['    Daya total (P)           ',num2str(ptot),' watt                ',num2str(ptotd),' watt'])
disp('************************************************************************')
Read more >>

Program Penyelesaian persamaan kuadrat (ABC)


disp('---------------------');
disp('Program Penyelesaian persamaan kuadrat (ABC)')
disp('dibuat Oleh : Mashudan Kurniawan')
disp('Hari/tanggal: sabtu/10 Okt 2012')
%-------------------------
%persamaan ax^2+bx+c, dimana:
a=1     %harga a
b=-5     %harga b
c=1     %harga c
%Deskripsi dan Perhitungan
%------------------------------
d=b^2-4*a*c       %D=diskriminan
x1=(-b+sqrt(d))/(2*a) %Akar x1
x2=(-b-sqrt(d))/(2*a) %Akar x2

MENU INPUT

disp('---------------------');
disp('Program Penyelesaian persamaan kuadrat (ABC)')
disp('dibuat Oleh : Mashudan Kurniawan')
disp('Hari/tanggal: sabtu/10 Okt 2012')
disp('---------------------------------')
%-------------------------
%persamaan ax^2+bx+c, dimana:
a=input('masukan nilai a =.....?')     %harga a
b=input('masukan nilai b =.....?')     %harga b
c=input('masukan nilai c =.....?')     %harga c
%Deskripsi dan Perhitungan
%------------------------------
d=b^2-4*a*c       %D=diskriminan
x1=(-b+sqrt(d))/(2*a) %Akar x1
x2=(-b-sqrt(d))/(2*a) %Akar x2
Read more >>

MEMBUAT MENU PILIHAN DENGAN MATLAB




clear all
clc
disp ('***************************************************************')
disp ('               PENYELESAIAN SOAL TRANSMISI                     ')
disp ('***************************************************************')
disp ('NAMA              = MASHUDAN KURNIAWAN                         ')
disp ('NIM               = 061030310851                               ')
disp ('KELAS             = 5 ELB                                      ')
disp ('MATA KULIAH       = PEMROGRAMAN KOMPUTER                       ')
disp ('DOSEN PEMBIMBING  = ANTON FIRMANSYAH,S.T.,M.T.                 ')
disp ('HARI/TANGGAL      = SABTU,20 NOVEMBER 2012                     ')
disp ('---------------------------------------------------------------')
disp ('silahkan pilih penyelesaian soal di bawah ini                  ')
disp ('---------------------------------------------------------------')
disp ('PILIHAN')
disp ('---------------------------------------------------------------')
disp ('1.  soal 1')
disp ('2.  soal 2')
disp ('3.  soal 3')
disp ('4.  selesai')
disp ('---------------------------------------------------------------')
pilih=input('masukkan pilihan Anda =  ');
disp ('---------------------------------------------------------------')
while pilih ~=3
switch pilih
case 1
disp('SOAL 1')
disp('Suatu saluran transmisi fasa tiga,50 km,70 KV,mempunyai konstanta:')
disp('R=0,20 ohm per km;X=0,608 ohm per km; Y=j4,0 X 10^-6 mho per km.')
disp('Saluran transmisi tersebut mensuplai beban 30 MW dan faktor daya pf=0,9 terbelakang')
disp('Tegangan pada ujung beban 70 KV.Hitunglah:')
disp('a.tegangan pada ujung kirim ')
disp('b.daya pada ujung kirim')
disp('c.efisiensi transmisi')
disp('d.pengaturan tegangan')
disp('Penyelesaian')
disp(' ')
disp('Is = IR = I ')
disp('VS = VR + IZ')
Pr=30;
V=70;
VR=(V/sqrt(3))*(1000);
disp(['PR = ',num2str(Pr),(' MW'),' ;pf = 0,9 terbelakang'])
disp('                       __')
disp('VR = 70 KV(L-L)= 70 / /3 KV (L-N) ')
disp(['               = ',num2str(VR),' Volt(L-N)'])
S=50;
R=0.2;
X=0.608;
Y=(j*4)*1e-6;
PR=30000;
pf=0.9;
%jawab:
%Soal a
disp(' ')
disp('a. Karena panjang saluran 50 km,jadi ini adalah saluran pendek')
%
IR=(Pr)*(1000)/(sqrt(3)*(V)*(pf));
sudutIR=acosd(pf);
%
z=complex(R,X)*50;
Z=sqrt(real(z)^2+imag(z)^2);
sudutZ=atand(imag(z)/real(z));
%
IZ=(IR*Z);
sudutIZ=(sudutZ-sudutIR);
z1=complex(IZ*cosd(sudutIZ),IZ*sind(sudutIZ));
VS=VR+real(z1);
image_z1=imag(z1);
z2=complex(VS,image_z1);
Vs=(sqrt(real(z2)^2+imag(z2)^2))/1000;
sudut_VS=atand(imag(z2)/real(z2));
disp (['   Vs=',num2str(Vs),(' /__ '),num2str(sudut_VS),(' KV(L-N)')]);
disp ('   atau')
VS=((sqrt(real(z2)^2+imag(z2)^2))/1000)*(sqrt(3));
disp (['   |Vs|=',num2str(VS),(' KV(L-L)')]);
disp (['   Jadi Tegangan pada ujung kirim(Vs)=',num2str(VS),(' KV(L-L)')]);
disp (' ')
%Soal B
teta_s=(sudut_VS)+sudutIR;
Ps=((sqrt(3))*(VS)*(IR)*(cosd(teta_s)))/(1000);
disp (['(B)Daya pada ujung kirim(Ps)=',num2str(Ps),(' MW')]);
disp (' ')
%Soal C
Eff=(Pr/Ps)*100;
disp (['(C)Efisiensi Transmisi (Eff)=',num2str(Eff),('%')]);
disp (' ')
%Soal D
VRF=((VS-V)/(V))*(100);
disp (['(D)Pengaturan Tegangan VR(%)=',num2str(VRF),('%')]);
pause;
return
%
case 2
disp('Soal No 2')
disp('Suatu saluran transmisi fasa tiga, 200 km, 220 KV. Konstanta')
disp('Kawat:Z=0,64 sudut71,8 ohm/km; Y=4e-6 sudut90 mho.km.Saluran')
disp('Transmisi di atas menyalurkan daya sebesar 100 MW dan pf=1,0')
disp('Pada ujung beban.Tegangan pada ujung beban 220KV.dengan meng-')
disp('Gunakan representasi nominal PI')
disp('Tentukanlah:')
disp('a.Tegangan dan arus pada ujung kirim')
disp('b.Efisiensi Transmisi')
disp('c.Pengaturan Tegangan')
disp('Penyelesaian')
%dik:
Pr=100;
pf=1;
y=4e-6;
sudut_y=90;
V=220;
s=200;
z=0.64;
sudut_z=71.8;
%Jawab
IR=(Pr)*(1000)/(sqrt(3)*V);
sudutIR=atand(pf);
VR=V/sqrt(3);
Z=z*s;
Y=s*y;
zy_2=(Z)*(Y/2);
sudutzy=sudut_y+sudut_z;
a=complex(zy_2*cosd(sudutzy),zy_2*sind(sudutzy));
b=1+real(a);
zy2=sqrt((b)^2+imag(a)^2);
sudut_zy2=atand(imag(a)/real(b));
zy_4=(Z)*(Y/4);
c=complex(zy_4*cosd(sudutzy),zy_4*sind(sudutzy));
d=1+real(c);
zy4=sqrt((d)^2+imag(c)^2);
sudut_zy4=atand(imag(c)/real(d));
%Tegangan pada ujung kirim
VS1=(zy2)*(VR*1000);
VS2=(Z)*(IR);
z1=complex(VS2*cosd(sudut_z),VS2*sind(sudut_z))+complex(VS1*cosd(sudut_zy2),VS1*sind(sudut_zy2));
VS=((sqrt(real(z1)^2+imag(z1)^2))*sqrt(3))/1000;
sudut_VS=atand(imag(z1)/real(z1));
disp (['(A)Tegangan pada ujung kirim(Vs)=',num2str(VS),(' sudut'),num2str(sudut_VS),(' KV(L-L)')]);
%Arus pada ujung kirim
IS1=zy4*Y*(VR*1000);
IS2=zy2*IR;
sudut_IS1=sudut_y+sudut_zy4;
z2=complex(IS1*cosd(sudut_IS1),IS1*sind(sudut_IS1))+complex(IS2*cosd(sudut_zy2),IS2*sind(sudut_zy2));
IS=sqrt(real(z2)^2+imag(z2)^2);
sudut_IS=atand(imag(z2)/real(z2));
disp (['   Daya pada ujung kirim    (Ps)=',num2str(IS),(' sudut'),num2str(sudut_IS),(' Ampere')]);
teta_S=sudut_VS-sudut_IS;
Ps=(3*(sqrt(real(z1)^2+imag(z1)^2))/1000*IS*cosd(teta_S))/1000;
disp (' ')
%Efisiensi transmisi
Eff=(Pr/Ps)*100;
disp (['(B)Efisiensi Transmisi (Eff)=',num2str(Eff),('%')]);
disp (' ')
%Pengaturan Tegangan
VR_NL=((sqrt(real(z1)^2+imag(z1)^2))/1000)/zy2;
VRF=((VR_NL-VR)/(VR))*100;
disp (['(C)Pengaturan Tegangan VR(%)=',num2str(VRF),('%')]);
pause;
return
%
case 3
 disp('Soal 3')
disp('Penentuan besar beban pada rugi-rugi tertentu. Tentukanlah jumlah')
disp('Daya pada ujung beban,  bila  faktor daya beban cos teta_R , yang')
disp('Dapat ditransmisikan melalui saluran pendek dengan tegangan ujung')
disp('Kirim Vs dan rugi-rugi transmisi yang diijinkan L?')
disp('Jawab:')
%SOAL A
%dik:
l=20;
z=complex(0.263,0.765);
cos_teta=0.906;
teta_R=-25;
teta=acosd(cos_teta);
Vs_LL=30;
Vs_LN=19;
%jawab:
Zr=(100*real(z)*l)/(10*cos_teta);
a=19000+j*0;
b=0.808+j*0;
c=complex(20*cosd(71),20*sind(71));
d=complex(58.1*cosd(25),58.1*sind(25));
e=1+j*0;
z=a/((b*c/d)+1);
f=complex(real(z),imag(z));
Vr=(sqrt(real(f)^2+imag(f)^2))/1000;
sudut_Vr=atand(imag(f)/real(f));
Ir=(Vr*1000)/Zr;
%jadi
Pr_fasa=((Vr*Ir)*cosd(-25));
Pr_3fasa=((Vr*Ir)*cosd(-25))*3;
teta_S=teta_R+sudut_Vr;
Ps_fasa=(Vs_LN*Ir)*cosd(teta_S);
Ps_3fasa=(Vs_LN*Ir)*cosd(teta_S)*3;
eff=Pr_fasa/Ps_fasa;
rugi_rugi=Ps_fasa-Pr_fasa;
Vr_persen=((Vs_LN-Vr)/Vr)*100;
disp(['(A)Tegangan Pada Ujung Beban(Vr)=',num2str(Vr),(' KV(L-L)')]);
disp(['   Daya Pada Ujung Beban(Pr)    =',num2str(Pr_3fasa),(' KW/3fasa')]);
disp(['   Daya Pada Ujung kirim(Ps)    =',num2str(Ps_3fasa),(' KW/3fasa')]);
disp(['   Efisiensi                    =',num2str(eff),]);
disp(['   Rugi-rugi                    =',num2str(rugi_rugi),(' KW/fasa')]);
disp(['   Pengaturan Tegangan VR(%)    =',num2str(Vr_persen),(' %')]);
%SOAL B
Y=((5.58)*(10^4));
thet=90;
disp('Y=5.58*10^4/__90 ')
Vs=66;
disp(['VS = ',num2str(Vs),'KV (L-L)'])
Zr=(100*0.263*100)/(15*cos_teta);
sudutZr=25;
Zr1=200;
disp(['ZR = ',num2str(Zr),' /__25 ohm'])
Zs=40.4;
sudutZs=71;
disp(['ZS = ',num2str(Zs),' /__71 ohm'])
Vs_a=(66/sqrt(3));
a1=1;
r1=40.4;
theta1=71;
z1_a=cosd(theta1)*r1;
z1_b=sind(theta1)*r1;
z1=complex(z1_a,z1_b)
%
z2_a=cosd(thet)*Y;
z2_b=sind(thet)*Y;
z2=complex(z2_a,z2_b)
brew=((a1)+(z1)+(z2));
bre=(brew/4);
br=brew+bre;
%
r3=80.8;
tet=71
z3_a=cosd(tet)*r3;
z3_b=sind(tet)*r3;
z3=complex(z3_a,z3_b)
%

z4_a=cosd(sudutZr)*Zr1;
z4_b=sind(sudutZr)*Zr1;
z4=complex(z4_a,z4_b)
%
bro=(z3/z4);
%
Has=(Vs_a)/(br);
hasil=(Has*bro);
%
IR=sqrt((real(hasil))^2+(imag(hasil)^2))
sudut_Z1=atand(imag(hasil)/real(hasil))


pause;
return
end
end


Read more >>

VEKTOR DAN MATRIK DENGAN MATLAB


VEKTOR DAN MATRIK DENGAN MATLAB
1.     FORMAT DATA
Dalam matlab dikenal dua jenis format data yaitu vektor dan matrik. Vektor atau matrik di definisikan dengan tanda kurung siku “ [ ] “untuk memisahkan kolom digunakan tanda koma ” , ” atau spasi tanda “ ; ” digunakan untuk memisahkan baris.
a.      Vektor
Vektor adalah sekelompok bilangan yang tersusun atas satu dimensi, dimensi ini bisa berupa baris atau kolom.
Contoh vektor baris:
>>a = [1,2,3]

a =

     1     2     3

>> b = [1 2 3]

b =

     1     2     3

Contoh vektor kolom:
>> a = [1;2;3]

a =

     1
     2
     3
Untuk mendefinisikan suatu vektor dengan jumlah elemen yang banyak tetapi memiliki interval yang teratur digunakan operator ” : “
>> a = 1:10

a =

     1     2     3     4     5     6     7     8     9    10




Untuk membuat suatu vektor baris dengan interval 2 sebagai contoh berikut:
>> a = 1:2:10

a =

     1     3     5     7     9
2.      MATRIK
            Matrik adalah sekelompok bilangan yang tersusun dalam segi empat dua dimensi,matrik bisa matrik bujur sangkar dan matrik segiempat.
a.      Menginputkan matrik
Ada empat cara untuk menginputkan matrik
Cara 1:
>> a=[1 2 3;4 5 6;7 8 9]

Cara 2:
>> a=[1 2 3
5 5 6
7 8 9]

Cara 3:
>> a1=[1 2 3];
>> a2=[4 5 6];
>> a3=[7 8 9];
>> a=[a1;a2;a3];
>> a

Cara 4:
>> a=input('masukan matrik= ');
masukan matrik= [1 2 3;4 5 6;7 8 9]
>> disp(a)

3.      Perkalian Matrik
1.      Perkalian Skalar
Untuk mengalikan satu matrik dengan bilangan tunggal (skalar) masing-masing elemen matrik harus dikalikan dengan faktor tersebut.
Contoh:
>> a = 4

a =

     4

>> b = [3 2 5;6 1 7]

b =

     3     2     5
     6     1     7

>> c = a*b

c =

    12     8    20
    24     4    28

2.      Perkalian Dua Matrik
Dua matrik dapat dikalikan satu sama lain apabila jumlah kolom dalam matrik pertama sama dengan jumlah baris matrik kedua.
Contoh:
>> a=[1 2 3;4 5 6;7 8 0]

a =

     1     2     3
     4     5     6
     7     8     0

>> b=[366;804;351]

b =

   366
   804
   351

>> det(a)

ans =

    27

>> inv(a)
ans =
   -1.7778    0.8889   -0.1111
    1.5556   -0.7778    0.2222
   -0.1111    0.2222   -0.1111
Penyelasaian dengan statement inv
Cara 1:
>> x=inv(a)*b
x =
   25.0000
   22.0000
   99.0000
Cara 2:
>> x=a\b

x =

   25.0000
   22.0000
   99.0000
Cara 3:
>> [L,U]=lu(a)

L =

    0.1429    1.0000         0
    0.5714    0.5000    1.0000
    1.0000         0         0

U =
    7.0000    8.0000         0
         0    0.8571    3.0000
         0         0    4.5000

>> x=inv(U)*inv(L)*b
x =
   25.0000
   22.0000
   99.0000

Cara lain:
>>  ABC = [6 -3 4;12 5 -7;-6 2 6]

ABC =

     6    -3     4
    12     5    -7
    -6     2     6

>> K=[41;-26;14]

K =

    41
   -26
    14

>> xyz=inv(ABC)*K

xyz =

    2.0035
   -2.6842
    5.2316

MODIFIKASI MATRIK

Kita dapat mengganti elemen dari matrik yang telah didefinisikan hal ini dapat berguna apabila kita bekerja dengan matrik yang sangat besar. Kemudian kita ingin mengganti eleman matrik  pada baris dua kolom tiga dengan angka 10.
>> d=[1 2 3;4 5 6]

d =

     1     2     3
     4     5     6

>> d(2,3)=10

d =
     1     2     3
     4     5    10
TRANSPOSE MATRIK
Transpose matrik merupakan salah satu operasi penting dalam matrik, dengan mengetik tanda kutip tunggal “ ‘ “ bisa digunakan untuk mengubah bentuk elemen baris menjadi kolom.
>> d

d =
     0     5     3
     4     5    10

>> d'
ans =
     0     4
     5     5
     3    10
BILANGAN KOMPLEK
Bilangan komplek adalah suatu bilangan yang terdiri dari atas dua suku yang terpisah sering ditulis sebagai:
z=a+jb
dimana:
a=bilangan real dari z
b=bilangan imajiner dari z
bilangan imajiner sering ditulis juga Mejᶿ
dimana:
M adalah magnitude, M=
0 adalah sudut, =tan-1(b/a)

BENTUK POLAR SUATU BIL. KOMPLEKS
Contoh:
>> z

z =

   3.0000 + 4.0000i

>> abs(z)

ans =

     5

>> angle(z)

ans =

    0.9273

>> real(z)

ans =

     3

>> imag(z)

ans =

     4

>> conj(z)

ans =

   3.0000 - 4.0000i
Read more >>