Flop Magazin 34/Flop_Magazin_34_1995_02_Raster_cs_Side_A.atr/delitel.c

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;¢}¢