home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Flop Magazin 34
/
Flop_Magazin_34_1995_02_Raster_cs_Side_A.atr
/
delitel.c
< prev
next >
Wrap
Text File
|
2023-02-26
|
1KB
|
1 lines
/* Nejmensi spolecny delitel */¢/* podle "Zaciname s programovanim" */¢/* predelano z PASCALU */¢¢main()¢{¢ do {¢ printf("\n\nVypocet nejmensiho spolecneho delitele\n");¢ delitel();¢ printf("\n\npro ukonceni stiskni Q (jen velke !)\n");¢ } while(getchar()!='Q');¢}¢¢delitel()¢{ int n,m,i,n1,m1;¢ char v[200];¢¢ printf("\n\tZadej dve cela cisla");¢¢ /* vstup cisla */¢do {¢ printf("\n\n vloz cislo N (0-32767): ");¢ gets(v);¢ n=val(v);¢ printf("\n nacteno cislo: %d",n);¢} while (n<1); ¢¢do {¢ printf("\n\nvloz cislo M (0-32767): ");¢ gets(v);¢ m=val(v);¢ printf("\n nacteno cislo: %d",m);¢} while(m<0); ¢¢/* Eukliduv algoritmus */¢ printf("\n\n\t Eukliduv algoritmus \n\n");¢¢ n1 = n;m1 = m;¢ i = 0;¢¢ while (n1 != m1)¢ { i++;¢ if (m1>n1)¢ m1=m1-n1;¢ else¢ n1 = n1-m1;¢ }¢ printf("\nNejveti spolecny delitel %d a %d je %d\n",n,m,n1);¢ printf("\nPocet kroku vypoctu : %d\n",i);¢¢/* rychly algoritmus */¢ printf("\n\t Zrychleny algoritmus \n\n");¢ i=0;¢ while (m>0)¢ { i++;¢ if (n>m)¢ n1=m;m=n;n=n1;¢ m=m%n;¢ }¢ printf("\nNejvetsi spolecny delitel je %d\n",n);¢ printf("\n Pocet kroku vypoctu : %d\n",i);¢¢ return;¢}¢