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…

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…