PROGRAM DETEKSI JUMLAH HURUF VOKAL & KONSONAN___Rio Akbar Yuwono (2413100106)

Minggu, 23 Maret 2014
close all
clear
clc
disp('^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^')
disp('PROGRAM DETEKSI JUMLAH HURUF VOKAL & KONSONAN')
disp('                                        2413100106                                                    ')
disp('^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^')

N=input('Masukkan Kata/Kalimat=','s');
Z=double(N); %Konversi input ke ASCII
D=size(Z);
B=max(D);
c=0;
k=0;

for i=1;
  for j=1:B;
       if Z(i,j)==65
           k=k+1;
      elseif Z(i,j)==73
           k=k+1;
      elseif Z(i,j)==85
           k=k+1;
      elseif Z(i,j)==69
           k=k+1;
      elseif Z(i,j)==79
           k=k+1;
      elseif Z(i,j)==97
           k=k+1;
      elseif Z(i,j)==105
           k=k+1;
      elseif Z(i,j)==117
           k=k+1;
      elseif Z(i,j)==101
           k=k+1;
      elseif Z(i,j)==111
           k=k+1;
      elseif Z(i,j)==32
           d=0;
      else c=c+1;
      end
   end
end

disp('Jumlah Huruf Vokal=')
disp(k)

disp('Jumlah Huruf Konsonan=')
disp(c)


Download Button
Add caption

0 komentar:

Posting Komentar