TT algoritmusok szoveg v014.pdf
TT algoritmusok szoveg v014.pdf
TT algoritmusok szoveg v014.pdf
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
}<br />
getchar();<br />
return 0;<br />
void Torzstenyezok_lnko(int szam1, int szam2)<br />
{<br />
int s1, s2, lktobb, oszto1, oszto2, v;<br />
printf("\n\nTorzstenyezokre bontas modszerrel\n\n");<br />
if (szam1 > 0 && szam2 > 0)<br />
{<br />
s1 = szam1;<br />
s2 = szam2;<br />
lktobb = 1;<br />
while (szam2 != 1 || szam1 != 1)<br />
{<br />
oszto1 = 2;<br />
oszto2 = 2;<br />
while (szam1 != 1)<br />
{<br />
while (szam1 % oszto1 != 0)<br />
{<br />
oszto1++;<br />
}<br />
if (szam2 % oszto1 == 0)<br />
szam2 /= oszto1;<br />
lktobb*= oszto1;<br />
szam1 /= oszto1;<br />
}<br />
while (szam2 != 1)<br />
{<br />
while (szam2 % oszto2 != 0)<br />
{<br />
oszto2++;<br />
}<br />
szam2 /=oszto2;<br />
lktobb*=oszto2;<br />
}<br />
}<br />
v = s1*s2/lktobb;<br />
printf("Legnagyobb kozos oszto: %d\n",v);<br />
printf("Legkisebb kozos tobbszoros: %d",lktobb);<br />
}<br />
}<br />
/*Kiindulo forras: Computerbooks Benko Tiborne - Dr. Poppe Andras<br />
Együtt Konnyebb a Programozas - C Programozas<br />
Programot modosította Dr Tuzson Tibor 2009*/<br />
5.3.3. LKO és LKT Euklideszi algoritmussal [17.], [18.].<br />
Az Euklideszi algoritmus, ismételt maradékos egész osztásokból áll. Az algoritmus<br />
eredményeképpen a b és a c legnagyobb közös osztóját (LKO) kapjuk meg. A program végén<br />
kiszámítjuk az LKT-t is.<br />
ALGORITMUSOK: Informatika 1. Laborgyakorlat; Összeállította: Dr Tuzson Tibor docens<br />
34/38