http://wiki.cabal.mx/index.php?action=history&feed=atom&title=Curso_de_Programaci%C3%B3n_en_C%2FProg107 2026-05-13T02:16:34Z Historial de revisiones para esta página en el wiki MediaWiki 1.32.1 http://wiki.cabal.mx/index.php?title=Curso_de_Programaci%C3%B3n_en_C/Prog107&diff=3884&oldid=prev 2012-07-13T02:04:10Z

<p>Página creada con &#039;__NOTOC__ * <a href="#Prog107"> Mejor random</a> ** <a href="#Resultado"> Resultado</a> ** <a href="#Explicaci.C3.B3n"> Explicación</a> == Prog107 == &lt;syntaxhighlight lang=&quot;c&quot; line=&quot;GESHI_FANCY_LINE_NUM...&#039;</p> <p><b>Página nueva</b></p><div>__NOTOC__<br /> * [[:#Prog107 | Mejor random]]<br /> ** [[:#Resultado | Resultado]]<br /> ** [[:#Explicación | Explicación]]<br /> <br /> == Prog107 ==<br /> <br /> &lt;syntaxhighlight lang=&quot;c&quot; line=&quot;GESHI_FANCY_LINE_NUMBERS&quot;&gt;<br /> <br /> //Archivo Prog107a.c<br /> static unsigned long int Siguiente = 1; /* La semilla */<br /> <br /> int rand1( void )<br /> {<br /> Siguiente = Siguiente * 1103515245 + 12345;<br /> <br /> return (unsigned int) (Siguiente/65536) % 32768;<br /> }<br /> <br /> void srand1(unsigned int Semilla)<br /> {<br /> Siguiente = Semilla;<br /> }<br /> <br /> // Archivo Prog107b.c<br /> #include &lt;stdio.h&gt;<br /> <br /> extern void srand1( unsigned int x );<br /> extern int rand1( void );<br /> <br /> int main( void )<br /> {<br /> int Contar;<br /> unsigned Semilla;<br /> <br /> printf( &quot;Ingressa una semilla (entero positivo): &quot; );<br /> <br /> while( scanf( &quot;%u&quot;, &amp;Semilla ) == 1 )<br /> {<br /> srand1( Semilla );<br /> <br /> for( Contar = 0; Contar &lt; 5; Contar++ )<br /> printf( &quot;%hd\n&quot;, rand1() );<br /> <br /> printf(&quot;Ingressa una semilla (entero positivo o q a terminar): &quot;);<br /> }<br /> <br /> printf( &quot;Listo\n&quot; );<br /> <br /> return 0;<br /> }<br /> <br /> &lt;/syntaxhighlight&gt;<br /> <br /> === Resultado ===<br /> &lt;pre&gt; <br /> [rrc@llawyr CClase]$ gcc -Wall -o Prog107 Prog107a.c Prog107b.c <br /> [rrc@llawyr CClase]$ ./Prog107<br /> Ingressa una semilla (entero positivo): 4<br /> 1817<br /> 24166<br /> 10491<br /> 3711<br /> 15407<br /> Ingressa una semilla (entero positivo o q a terminar): 4<br /> 1817<br /> 24166<br /> 10491<br /> 3711<br /> 15407<br /> Ingressa una semilla (entero positivo o q a terminar): 7<br /> 19564<br /> 9806<br /> 10868<br /> 22674<br /> 32531<br /> Ingressa una semilla (entero positivo o q a terminar): 3<br /> 17747<br /> 7107<br /> 10365<br /> 8312<br /> 20622<br /> Ingressa una semilla (entero positivo o q a terminar): q<br /> Listo<br /> [rrc@llawyr CClase]$ <br /> <br /> &lt;/pre&gt;<br /> <br /> === Explicación ===<br /> <br /> [[Category:Programación en C]]<br /> [[Category:CCabal]]<br /> [[Category:CursoC]]</div>

Rrc