Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

Nuevo problema: + ( Encontrar ramas similares


stalin   (2001-12-18 00:20) [0]

Al saber cuántos dígitos hay en un número de forma matemática para desplegar un número (es decir, era 135, se debería obtener 531) ... ¡Aquí! ; +)



Blackweber   (2001-12-18 00:28) [1]

Es posible iniciar un ciclo desde 1 hasta la longitud (num), en el que se lee el primer dígito y se coloca al final del número.



Blackweber   (2001-12-18 00:34) [2]

es decir, 135> 351> 513



False_Delirium   (2001-12-18 01:02) [3]

Función inversa (Z: entero): entero;
var T: entero;
comenzar
Resultado: = 0;
T: = Trunc (Ln (Z) / Ln (10));
mientras que Z> 0 hacer
comenzar
Inc (Resultado, (Z mod 10) * Ronda (Exp ((T) * Ln (10))));
Z: = Z div 10;
Diciembre (T);
fin
fin;



Sergey_n   (2001-12-18 01:37) [4]

Puedo ofrecer una variante en C ++

int x = 27531; // que debe ser desplegado
int y = 0; // donde desplegar
int n = (int) log10 (x); // la longitud del número a expandir
para (int i = n; i> = 0; i -) {
y=y+((int)(x/pow(10,i))-10*(int)(x/pow(10,i+1)))*(int)pow(10,n-i);
}



False_Delirium   (2001-12-18 02:05) [5]

> Sergey_n Usted tiene operaciones 14 para la interrelación ... y yo tengo 10 ... :) .. heh .. :)) .. :))) ... ¿quién es menos ..?. :)))



Sergey_n   (2001-12-18 03:16) [6]

La pregunta fue planteada para escribir, y no quién es menos. En este caso, la tarea se completa. Por cierto, ¿cómo crees (iteración)?



False_Delirium   (2001-12-18 04:14) [7]

¿Por qué luego escribiste si la tarea ya se completó cuando se escribió el primer ejemplo ...? El número de iteraciones es el número de repeticiones del ciclo, y el número de operaciones es el número de operaciones aritméticas por iteración.



Sergey_n   (2001-12-18 22:59) [8]

2False_Delirium cuando comencé a escribirlo aún no se había completado.

> El número de iteraciones es el número de repeticiones del ciclo, y el número
> operaciones es el número de operaciones aritméticas por iteración.
Es un pan comido. ¿Está seguro de que en el interior de Fu-i Inc, Round, ... operaciones aritméticas tanto como cree ????



False_Delirium   (2001-12-19 00:10) [9]

Heh ... :) ... pero estoy seguro en Inc, pero Round se ejecuta válidamente en operaciones 3, puedes eliminarlo por completo ... pero, ¿qué dices sobre pow ... :) ...? ... :)



KilkennyCat   (2001-12-19 02:27) [10]

Pero esta no es una forma matemática.



Sergey_n   (2001-12-19 04:41) [11]

2False_Delirium I no fue perezoso y se probó utilizando una traza. prog
Label1-> Caption = DateTimeToStr (Now ());
doble x = 20, y;
para (registro __int16 i = 0; i <2767; i ++)
para (registro __int16 j = 0; j <32767; j ++)
<expresión de prueba>;

Label2-> Caption = DateTimeToStr (Now ());

Y aquí está el resultado:
expresión | runtime (para mi computadora)
-------------------------------------------------- ---------
pow (10, x) | 19 sec
exp (x) | 28 sec
ln (x) | 25 sec
-------------------------------------------------- ---------

exp total + ln = 53 sec, pow + pow + pow = 57 sec
pero si agrega Inc, Round, Dec, .... to exp + ln
entonces todavía puedes discutir quién es más rápido.



False_Delirium   (2001-12-19 05:16) [12]

Escriba en Pascal para comenzar y luego compare ... :)) ... para probar ...
de lo contrario, debe considerar dos idiomas en el contexto de la velocidad de ejecución .. :) ..
Sí ... para que pruebes inmediatamente la función de "golpe" ....



False_Delirium   (2001-12-19 05:32) [13]

> KilkennyCat ¿Y cuál es este método ... ??. :) ... exactamente matemático, no se usaron otras operaciones ...



False_Delirium   (2001-12-19 05:37) [14]

Sí, por cierto ... DateTimeToStr (Now ()) es una función poco adecuada para tales pruebas .. :)) ..



Sergey_n   (2001-12-19 06:10) [15]

2False_Delirium Delphi es demasiado perezoso para apostar, pero ¿por qué no te gusta DateTimeToStr (Now ())? Si tiene precisión, aumente el ciclo (o su número) para que dure más.



KilkennyCat   (2001-12-20 01:33) [16]

> False_Delirium ¿Las matemáticas tienen ciclos? :)



Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba





Memoria: 0.59 MB
Tiempo: 0.027 c
1-22220
Kandyl
2001-12-16 15:10
2002.01.08
¿Cómo evitar eliminar cualquier carpeta sin colgar en la bandeja?


14-22326
Mcsimm
2001-11-04 11:35
2002.01.08
Alguien quería estirar sus cerebros? ¿Cuáles son las opciones para el algoritmo?


3-21957
KMM
2001-11-29 15:31
2002.01.08
En el curso del programa, es necesario crear y eliminar una tabla muchas veces ...


1-22013
Curioso
2001-12-17 12:53
2002.01.08
Ejecutar exe desde el programa actual.


1-22075
como
2001-12-19 12:40
2002.01.08
Tablas en MS Word





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish French
gallego georgiano Alemán Griego criollo haitiano Hebreo hindi Húngaro islandés Indonesian irlandés Italiana Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese Rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español