Matlab Yazılım Teknolojisi

Kullanııc tarafından girilen 2 sayının ekok'unu bulma algortiması; clear all clc x=input( 'Bir tamsayı giriniz: ' ); y=input( 'Bir tamsayı giriniz: ' ); asal_bolen= 0 ; sayac= 0 ; i = 2 ; durum= 1 ; while durum if mod (x, i ) == 0 || mod (y, i ) == 0 sayac=sayac + 1 ; asal_bolen(sayac)= i ; if mod (x, i ) == 0 x=x / i ; elseif mod (y, i ) == 0 y=y / i ; else x=x / i ; y=y / i ; end else i = i + 1 ; end if i > x durum= 0 ; end end disp ( 'Asal bölenler: ' ) disp (asal_bolen) %örnegin 72 sayısı için x_asal_bolen degişkeninin içinde %tutulan sayılar [2 2 2 3 3] %bu kuvvetleri aşagıdaki algoritma ile; %[0 2 3; % 0 3 2] haline getirecegiz. %algoritmanın görevi asal sayı 2'yi 2'inci %idise yazmak ve kuvvetinide alt satırına eklemek %x'in asal bölenlerin kuvvetlerini toplayalım bolen_

Kullanıcı tarafından girilen sayının asal çarpanlarını bulma algoritması; clc clear all x=input( 'Bir sayı giriniz: ' ); %kullanıcının x için 72 degerini girdigini varsayarak %aşagıdaki döngüde yapılan işlemleri anlatacagım % x sayısının asal bölen sayısını bulalım x_asal_bolen= 0 ; %asal bölenlerimizi bu degişkende dizi olarak tutacağız sayac= 0 ; %sayac ile dizinin indisini oluşturduk i = 2 ; % Bir sayıyı 2'den başlayarak böleriz durum= 1 ; %while döngüsünden çıkmak için koşulumuzu oluşturacak while durum if mod (x, i ) == 0 % x, i'ye tam bölünür mü ? sayac=sayac + 1 ; %dizinin indisi olan sayacı 1 artır x_asal_bolen(sayac)= i ; % i'yi asal bölen içine yaz x=x / i ; %sayımız i'ye bölünerek küçüldü else i = i + 1 ; % örnegin sayımız i=2 için bölünmüyorsa % i=3'e bölünüp bölğnmedigini bulmak için % i'yi 1 artırdık. end if i > x durum= 0 ;

Kullanıcı tarafından girilen 2 sayının ebobunu bulma; clc clear all x=input( 'Bir sayı giriniz: ' ); y=input( 'Bir sayı giriniz: ' ); %kullanıcının x için 72 degerini girdigini varsayarak %aşagıdaki döngüde yapılan işlemleri anlatacagım % x sayısının asal bölen sayısını bulalım x_asal_bolen= 0 ; %asal bölenlerimizi bu degişkende dizi olarak tutacağız sayac= 0 ; %sayac ile dizinin indisini oluşturduk i = 2 ; % Bir sayıyı 2'den başlayarak böleriz durum= 1 ; %while döngüsünden çıkmak için koşulumuzu oluşturacak while durum if mod (x, i ) == 0 % x, i'ye tam bölünür mü ? sayac=sayac + 1 ; %dizinin indisi olan sayacı 1 artır x_asal_bolen(sayac)= i ; % i'yi asal bölen içine yaz x=x / i ; %sayımız i'ye bölünerek küçüldü else i = i + 1 ; % örnegin sayımız i=2 için bölünmüyorsa % i=3'e bölünüp bölğnmedigini bulmak için % i'yi 1 artırdık. end if i &g

Kullanıcı tarafından girilen 2 sayı arasında yer alan asal sayıların bulunması; clear all clc %(X,Y) SAYILARI ARASINDAKİ ASAL SAYIALRI BULAN ALGORİTMA x=input( 'büyük sayıyı giriniz: ' ); y=input( 'basamaklı küçük sayıyı giriniz: ' ); %x sayısından y sayısına kadar olan asal sayıların bulunması asal_sayi= 0 ; sayac= 0 ; for sayi=x - 1 :y - 1 sonuc= 0 ; for i =sayi - 1 : - 1 : 2 if ( mod (sayi, i )) == 0 sonuc= 1 ; end end if sonuc == 0 sayac=sayac + 1 ; asal_sayi(sayac)=sayi; end sonuc= 0 ; end disp (asal_sayi)