Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Novo problema: + ( Encontre agências semelhantes


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

Como você sabe quantos dígitos em um número para implantar um número de uma forma matemática (ou seja, era 135, deveria ser 531) ....... Aqui! ; +)



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

Talvez você possa iniciar um ciclo de 1 para comprimento (num), no qual o primeiro dígito é lido e colocado no final do número.



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

isto é 135> 351> 513



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

Função Reversa (Z: Inteiro): Inteiro;
var T: inteiro;
começar
Resultado: = 0;
T: = Trunc (Ln (Z) / Ln (10));
enquanto Z> 0 faz
começar
Inc (Resultado, (Z mod 10) * Redondo (Exp ((T) * Ln (10))));
Z: = Z div 10;
Dez (t);
final
end;



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

Eu posso oferecer uma opção em C ++

int x = 27531; // que precisa ser expandido
int y = 0; // onde implantar
int n = (int) log10 (x); // o comprimento do número para 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 Você tem operações 14 para iteração .. e eu tenho 10 ... :) .. heh .. :)) .. :))) ... quem é menos ..?. :)))



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

A questão foi colocada para escrever, e não quem menos. Nesse caso, a tarefa é concluída. By the way, como você contou (iterações) ????



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

Por que você então escreveu se a tarefa já estava concluída quando o primeiro exemplo foi escrito? O número de iterações é o número de repetições do ciclo e o número de operações é o número de operações aritméticas por iteração.



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

2False_Delirium quando comecei a escrevê-lo ainda não foi executado.

> O número de iterações é o número de iterações e o número
> operações é o número de operações aritméticas por iteração.
isso é um acéfalo. Você tem certeza de que nos interiores do fu Inc, Round, ... aritmética age tanto quanto você pensa ?????



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

Heh .. :) ... mas tenho certeza de Inc, mas Round é de fato executado em operações 3, você pode removê-lo completamente ..... mas o que você pode dizer sobre pow ... :) ...? .. :)



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

mas isso não é um caminho matemático.



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

2False_Delirium Eu não estava com preguiça e testei usando o rastreamento. prog
Label1-> Caption = DateTimeToStr (Now ());
duplo x = 20, y;
para (registrar __int16 i = 0; i <2767; i ++)
para (registrar __int16 j = 0; j <32767; j ++)
<expressão para teste>;

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

e aqui está o resultado:
expressão | tempo de execução (para meu computador)
-------------------------------------------------- ---------
pow (10, x) | 19 seg
exp (x) | 28 seg
ln (x) | 25 seg
-------------------------------------------------- ---------

exp total + ln = 53 seg, pow + pow + pow = 57 seg
Bem, se você adicionar Inc, Round, Dec, .... exp + ln
então você pode argumentar quem é mais rápido.



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

Em pascal escreva para começar, e depois compare .. :)) ... para testar ...
caso contrário, você precisa considerar duas linguagens no contexto da velocidade de execução .. :) ..
Sim ... então você imediatamente testa as funções do "golpe" ....



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

> KilkennyCat E qual é o caminho .. ??. :) ... é matemático, nenhuma outra operação foi usada ..



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

Sim, a propósito ... DateTimeToStr (Now ()) é uma função um pouco inadequada para tais testes .. :)) ..



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

2False_Delirium Delphi com preguiça de colocar, mas por que você não gosta de DateTimeToStr (Now ())? Se você está falando sobre precisão, aumente o ciclo (ou o número deles) para que demore mais.



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

> False_Delirium e na matemática existem ciclos? :)



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima









Memória: 0.6 MB
Hora: 0.028 c
1-22058
$ Hic0
2001-12-16 11:49
2002.01.08
TTreeView e TListView


14-22389
sudiv
2001-11-08 15:38
2002.01.08
CashFiesta


7-22435
sssss
2001-09-23 14:15
2002.01.08
MASTERYYY !!! PERGUNTA DE VIDA E MORTE !!!!


1-22070
agarrar
2001-12-18 21:53
2002.01.08
gerenciamento de fontes com o menu POPUP


1-22193
T2
2001-12-14 03:17
2002.01.08
DLL





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russa sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol