Saturday, 19 November 2016

Program menampilkan angka jomblo di MATLAB


                Ada yang tau matlab? Aplikasi ini memang kurang popular dibandingkan dengan aplikasi pemrograman lain seperti codeblock, dll. Tapi tidak jarang program ini digunakan diberbagai perguruan tinggi yang ada mata kuliah teknologi informasi.
            Nah buat kamu mungkin yang pakai program ini. Ada nih satu contoh program menampilkan angka jomblo :
 
Program utama :
clear all
clc

s=input('Masukkan jumlah data : ');
i=1;
while i<=s
    z=input('');
    c(z)=0;
    for j=1:i
        a(i)=z;
        if a(i)==a(j);
            c(z)=c(z)+1;
        end
    end
    if c(z)>=3
        disp('Nilai sudah dimasukkan dua kali');
        i=i-1;
    end
    i=i+1;
end
disp('Nilai yang diinputkan : ');
for i=1:length(c)
    if c(i)>=1
        disp(i);
    end
end
disp('Nilai yang diinput ganda : ');
for i=1:length(c)
    if c(i)>1
        disp(i);
    end
end
Nb : soalnya bisa didownload disini (nomor 3)

Semoga bermanfaat…


Program memasukkan, mengecek dan menghitung tamu di MATLAB


                Ada yang tau matlab? Aplikasi ini memang kurang popular dibandingkan dengan aplikasi pemrograman lain seperti codeblock, dll. Tapi tidak jarang program ini digunakan diberbagai perguruan tinggi yang ada mata kuliah teknologi informasi.
            Nah buat kamu mungkin yang pakai program ini. Ada nih satu contoh program memasukkan, mengecek dan menghitung tamu:
 
Program utama :
clear all
clc

banyak=input('Masukkan banyak nama dalam list tamu : ');
for i=1:banyak
    angka=input('','s');
    for j=1:length(angka)
        tamu(i,j)=angka(j);
    end
end
f=1;
while f<=banyak
    hadir=input('nama : ','s');
    n=' ';
    for i=1:length(hadir)
        if hadir(i)~=' '
            s=hadir(i);
            n=[n,s];
        end
    end
    for i=1:banyak
        d(i)=0;
        temp=' ';
        for j=1:length(tamu)
            if tamu(i,j)~=0 && tamu(i,j)~=' '
                s=tamu(i,j);
                temp=[temp,s];
            end
        end
       
        if length(temp)==length(n)
            for k=1:length(n)
                if temp(k)==n(k)
                    d(i)=d(i)+1;
                end
            end
        end
    end
   
    sum=0;
    for h=1:banyak
        if d(h)==length(n)
            sum=sum+1;
        end
    end
   
    if sum~=0               
       fprintf('%s ada dalam list tamu\n',hadir);
       fprintf('Tamu yang hadir ada %d dari %d tamu\n',f,banyak);
       if f==banyak
           disp('Semua tamu telah hadir');
       end
       f=f+1;
    else
        fprintf('%s tidak ada dalam list tamu\n',hadir);
        fprintf('%s diusir dari pesta\n',hadir);
        fprintf('Tamu yang telah hadir %d dari %d tamu\n',f-1,banyak);
    end

end

Nb : soalnya bisa didownload disini (nomor 1)

Semoga bermanfaat…

Program menampilkan angka yang terlupa di MATLAB


                Ada yang tau matlab? Aplikasi ini memang kurang popular dibandingkan dengan aplikasi pemrograman lain seperti codeblock, dll. Tapi tidak jarang program ini digunakan diberbagai perguruan tinggi yang ada mata kuliah teknologi informasi.
            Nah buat kamu mungkin yang pakai program ini. Ada nih satu contoh program menampilkan angka yang terlupa:

Program utama :
clear all
clc

n=input('Masukkan nilai N : ');
for i=1:n
    data(i)=0;
end
i=1;
while i<=n-1
    s=input('Masukkan N-1 angka yang ditulis Tuan Vin : ');
    if s<=n && s>0
        data(s)=1;
        i=i+1;
    else
        fprintf('Input salah (1 sampai %d)\n',n);
    end
end
disp('Angka yang lupa ditulis : ');
for i=1:n
    if data(i)==0
        disp(i);
    end
end

Nb : soalnya bisa didownload disini (nomor 2)

Semoga bermanfaat…

Saturday, 12 November 2016

Program menghitung tingkat kecocokan (love test) di MATLAB


                Ada yang tau matlab? Aplikasi ini memang kurang popular dibandingkan dengan aplikasi pemrograman lain seperti codeblock, dll. Tapi tidak jarang program ini digunakan diberbagai perguruan tinggi yang ada mata kuliah teknologi informasi.
            Nah buat kamu mungkin yang pakai program ini. Ada nih satu contoh program menghitung tingkat kecocokan (love test):

Program utama :
clear all
clc

disp('Program Hitung Kecocokan Pasangan');
fprintf('\n');

B='truelove';
nama1=input('Masukkan nama anda : ','s');
nama2=input('Masukkan nama pasangan anda : ','s');

for i=1:8
    A(1,i)=0;
end

for i=1:length(nama1)
    for j=1:8;
    if nama1(i)==B(j);
        A(1,j)= A(1,j)+1;
    end
    end
end
for i=1:length(nama2)
    for j=1:8;
    if nama2(i)==B(j);
        A(1,j)= A(1,j)+1;
    end
    end
end

for i=0:5
    for j=1:7-i
        A(i+2,j)=A(i+1,j) + A(i+1,j+1);
    end
end

for i=1:2
    Z=num2str(A(7,i));
    A(7,i)=Z(length(Z));
end
fprintf('Kecocokan pasangan : %s%s%%\n',A(7,1),A(7,2));

Catatan : Soalnya bisa diunduh disini (soal nomor 1)
Semoga bermanfaat…


Program membaca dan menulis bilangan genap dalam file eksternal di MATLAB


                Ada yang tau matlab? Aplikasi memang kurang popular dibandingkan dengan aplikasi pemrograman lain seperti codeblock, dll. Tapi tidak jarang program ini digunakan diberbagai perguruan tinggi yang ada mata kuliah teknologi informasi.
            Nah buat kamu mungkin yang pakai program ini. Ada nih satu contoh program membaca dan menulis bilangan genap dalam file eksternal :
 
Program utama :
clear all
clc

n=input('Masukkan banyaknya bilangan : ');

if n>0 && n<1000
fprintf('Masukkan %d bilangan tersebut : \n',n);
j=1;
    for i=1:n
        a=input('');
        if mod(a,2)==0
            data(j)=a;
            j=j+1;
        end
    end

    if j>=2;
        tulis=fopen('fin.dat','w');
        fprintf(tulis,'%d\n',data);
        fclose(tulis);
        fprintf('Data berhasil dimasukkan ke dalam fin.dat\n');

        baca=fopen('fin.dat','r');
        genap=fscanf(baca,'%d');
        fclose(baca);

        p=length(genap);
            for i=1:p
                for k=1:p
                    if genap(i)>genap(k)
                        pindah=genap(i);
                        genap(i)=genap(k);
                        genap(k)=pindah;
                    end
                end
            end

            if p>1;
                selisih=genap(1)-genap(p);
            else
                selisih=genap(1);
            end
        fprintf('Selisih antara bilangan terbesar dan terkecilnya adalah %d\n',selisih);
    else
        disp('Tidak ada data yang bisa dimasukkan ke dalam fin.dat');
    end
else
    disp('N diluar domain');
end

Catatan : Soalnya bisa diunduh disini (soal nomor 2)


Semoga bermanfaat…
There was an error in this gadget