Selasa, 30 April 2013

pemrograman lanjut ke 7


MACAM-MACAM GRAFIK

%grafik 2d anak tangga = stairs
x=(-4:0.2:4)
y = exp(-x.*x)
stairs(x,y)
set(1,'name','stairs','numbertitle','on')

akan muncul grafik ..



T=rand(1,10)%memunculkan angka acak

stem(T)




%pie = lingkaran
x= [ 50 10 35 27]
pie (x,{'A','B','C','D'})
pie (x,[0 0 0 0])% untuk memisahkan 
pie3(x)%bentuk sel

[x,y] =meshgrid (-8:0.5:8) %memperoleh pasangan x dan y dengan nilai yang sama
R=sqrt(x.^2+y.^2)
z= sin (R)./R
mesh (x,y,z)


[x,y] =meshgrid (-2:1:2); %memperoleh pasangan x dan y dengan nilai yang sama
z=(x.^2-y.^2)
mesh (x,y,z)%kaitan tiap titik

%grafik z=y^2-x^2 pada domain [-1,1]x[1,1]
[x,y] =meshgrid (-2:1:2); %memperoleh pasangan x dan y dengan nilai yang sama
z=(x.^2-y.^2)
surf(x,y,z)%mengisi warna
%faceted
%shading flat
%lines dibuang tapi tiap bagian mempunyai warna yang sama
shading interp % dibuang dan warna tiap bagian di interpolasi
colormap(cool)

[x,y] =meshgrid (-8:0.5:8) %memperoleh pasangan x dan y dengan nilai yang sama
R=sqrt(x.^2+y.^2)
z= sin (R)./R
contourf(z)
colorbar %menunjukkan nilai
title('level kurva dari z= y^2 -x^2')


[x,y] =meshgrid (-8:0.5:8) %memperoleh pasangan x dan y dengan nilai yang sama
R=sqrt(x.^2+y.^2)
z= sin (R)./R
meshc(x,y,z)
colorbar %menunjukkan nilai
title('level kurva dari z= y^2 -x^2')


[theta,z]=meshgrid((0:0.1:2)*pi, (-1:0.1:1))
x=sqrt(1-z.^2).*cos(theta)
y=sqrt(1-z.^2).*sin (theta)
mesh (x,y,z)
axis square %agar bola tak lonjong
%3D
%kurva r(t)=(t*cos(t),t*sin(t),t)
t=-10*pi:pi/100:10*pi;
x= t.*cos(t);
y=t.*sin(t);
h= plot3(x,y,t)
title('kurva r(t)=(t*cos(t),t*sin(t),t)')
xlabel('x')
ylabel('y')
zlabel('y')
grid on


Kamis, 25 April 2013

BALADA monev PKM

Sebenarnya tahun lalu sudah ikut monev PKM tapi dulu status masih anggota, jadi ya merasa biasa aja. Tapi kali ini rasanya bedaa banget deg-degan terus dari senin,selasa,rabu, yang berakhir di kamis siang. Pengalaman dulu ada satu pemonev yang (BACA) kata kakak tingkat super duper kritis apalagi kalau PKMP , kebetulan dosen dijurusan saya. Karena saya dapat jadwal shift hari kedua maka saya cari-cari info katanya dosen tersebut tidak jadi pemonev. "yaaaaaaaaaaaaaaa
oye..oye..." . Bahagia sesaat merasa nyantai dan pingin terbanggg .........Konsultasi dosen beres dan keceplosan "Bu, saya takut kalau pemonevnya beliau''.
jam 09.00 mampir dulu ke mamah cantik | dosen pembimbing tercinta |. dan terdengar " sokor takkandakne nek wedi". Alamakkk.. bener-bener berdoa semoga tidak dapat pemonev itu. Sudah antri berjam2 hingga giliran tiba, pemonevnya isi semua, saat ada yang kosong pemonevnya keluar sebentar. Dan menengok keruang samping . AAAAAAAAAAAAA ada bapaknya. Waaa saat itu bapaknya kosong aduuhh bener2 g berani masuk deh. Tiba-tiba ada petugas ayo mba silahkan masuk.. AAA kenapa oh kenapa...
Bismillah ..
awali dengan senyuman ...
dan mendadak Pemonev " Jare koe wedi karo aku''
aaaaaa..bener-bener mati kutu..
"Presentasi berantakan, deg-degan".
Selesai Presentasi . Komentar dan masukan Pemonev sungguhhhh menajubkan. Diluardugaan dan sangat membantu. Walhasil prasyarat berupa :
Laporan Kemajuan
Log book
" Oke, cukup baguss". Waaa bahagiaaaaa luar biasaaaa


YANG PERLU DIPERHATIKAN
JANGAN PERCAYA DENGAN KATANYA OH KATANYA
BISMILLAH DO MAX AND ALL IS WELL

Minggu, 21 April 2013

rumus SD dengan matlab


syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('MENU YANG BISA ANDA PILIH')
disp('===================================================================================')
disp('1. volume silinder || 6. luas permukaan kubus     ||    11. luas trapesium       ||')
disp('2. volume kubus    || 7. luas permukaan kerucut   ||    12. luas lingkaran       ||')
disp('3. volume kerucut  || 8. luas permukaan bola      ||    13. luas persegi panjang ||')
disp('4. volume bola     || 9. luas segitiga            ||    14. luas permukaan balok ||')
disp('5. volume balok    || 10. luas jajar genjang      ||    15. Mencari FPB          ||')
disp('                                                  ||    16. mencari faktorial    ||')
disp('===================================================================================')
q=input('pilih diantara n0 1-16 = ')
switch q
    case 1
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume silinder')
            disp('========================================')
            t=input('masukkan tinggi tabung=');
            r=input('masukkan jari-jari tabung=');
            if t>0 r>0;
            vols=pi*r^2*t;
            fprintf('hasil= %f',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 2
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume kubus')
            disp('========================================')
            s=input('masukkan sisi kubus=');
            if s>0
            volk=s^3;
            fprintf('hasil= %f',volk)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 3
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume kerucut')
            disp('========================================')
            t=input('masukkan tinggi kerucut=');
            r=input('masukkan jari-jari alas=');
            if t>0 r>0;
            volkr=(pi*r^2*t)/3;
            fprintf('hasil= %2f',volkr)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
    case 4
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume bola')
            disp('========================================')
            r=input('masukkan jari-jari bola=');
            if r>0;
            volb=4/3*(pi*r^3);
            fprintf('hasil= %d',volb)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 5
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume balok')
            disp('========================================')
            t=input('masukkan tinggi =');
            p=input('masukkan panjang=');
            l=input('masukkan lebar= ')
            if t>0, p>0, l>0;
            volpp=p*l*t;
            fprintf('hasil= %d',volpp);
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 6
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas permukaan kubus')
            disp('========================================')
            s=input('masukkan sisi kubus=');
            if s>0
            luaspk=6*s*s;
            fprintf('hasil= %f',luaspk)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 7
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas permukaan kerucut')
            disp('========================================')
            t=input('masukkan tinggi kerucut=');
            r=input('masukkan jari-jari kerucut=');
            if t>0 r>0;
            vols=pi*r*(r+t);
            fprintf('hasil= %d',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 8
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas permukaan bola')
            disp('========================================')
            r=input('masukkan jari-jari =');
            if  r>0;
            vols=4*pi*r^2;
            fprintf('hasil= %d',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 9
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas segitiga')
            disp('========================================')
            t=input('masukkan tinggi =');
            r=input('masukkan alas=');
            if t>0 r>0;
            luas=(t*r)/2;
            fprintf('hasil= %d',luas)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 10
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas jajar genjang')
            disp('========================================')
            t=input('masukkan tinggi=');
            r=input('masukkan alas=');
            if t>0 r>0;
            luas=r*t;
            fprintf('hasil= %d',luas)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 11
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas trapesium')
            disp('========================================')
            t=input('masukkan tinggi = ');
            r=input('masukkan sisi bawah=');
            s=input('masukkan sisi atas= ')
            if t>0,s>0, r>0;
            luas=(r+s)/2*t;
            fprintf('hasil= %d',luas)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 12
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas lingkaran')
            disp('========================================')
            r=input('masukkan jari-jari =');
            if  r>0;
            luas=pi*r^2;
            fprintf('hasil= %d',luas)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 13
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas persegi panjang')
            disp('========================================')
            t=input('masukkan panjang=');
            r=input('masukkan lebar=');
            if t>0 r>0;
            vols=t*r;
            fprintf('hasil= %d',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 14
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas permukaan balok')
            disp('========================================')
            p=input('panjang=');
            l=input('lebar= ');
            t=input('tinggi= ');
            if t>0, p>0, l>0;
            vols=2*(p*l+l*t+p*t);
            fprintf('hasil= %d',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 15
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('fpb')
            disp('========================================')
            m=input('m= ');
            n= input ('n= ');
            if m>0 n>0
                r=rem(m,n);
            while r~0;
                m=n;
                n=r;
                r=rem(m,n);
            end
            fprintf('hasil= %d',n)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
    case 16
       syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('faktorial')
            disp('========================================')
            a=input('angka= ');
            if a>0
                c=1;
            for i=1:a ;
                c=c*i;
            end
                fprintf('faktorial %d',c)
           
                else
                    disp('angka tidak bolh negatif')
            end
            fprintf('\n')
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
    otherwise
        disp('masukkan sesuai no pilihan')
end
jawab=input ('kembali kemenu awal (y/t)?')
end

Jumat, 05 April 2013

kwu part one

1. a. Premium : kualitas tinggi berbayar
    b. Biasa      : kualitas biasa tanpa bayar
        "FREEMIUM" : KUALITAS TINGGI TANPA BAYAR
2.  Grafik bisnis itu Q(Quantitity) terhadap time (waktu)
     dalam keadaan awal bisa Q ~ 1/t karena kolaborasi bisa naik menjadi linier bahkan eksponensial
3. tingkatan :
      Data
      Komunitas
      Kolaborasi massa
      Bisnis
4. Facebook salah satu peluang terbesar untuk membentuk komunitas
5. Mari menjadi : "Leader of transformation"
6. Marketing is not selling BUT "understanding client"
7. Rencana bisnis itu harus kuat
8. Bisnis tidak harus dari nol tapi bisa dimulai dari modal nol
9. Kita tidak bisa keluar dari zona kompetisi tapi kita bisa memanagement kompetisi
10. INOVASI = management kompetisi
11. Inovasi harus mengalir secara continue
12. Mahasiswa gudang inovasi
13. INOVATOR = diawali tertib dan disiplin . ' Mari mengubah kebiasaan yuuk kawan '
TUGASSSSSSSSSS
search kompetisi entreurpreuneur ship INTERNASIONAL 2013
SEE YOU NEXT WEEK
at PD I office room :D
kalau ada yang salah mohon di koreksi ya kawan,,