[Arquivo!] Pura matemática, física, química, etc.: problemas de treinamento do cérebro não relacionados ao comércio de qualquer forma - página 312

 
Mathemat >>:
Richie, я могу привести пример на листе бумаги пять на пять, который не удовлетворяет требованиям задачи. Наверно, можно и для любого конечного, но тут помозговать надо.

Vamos pelo menos 7x7 :)

 
Richie, onde você está? Você desenhará um quadrado de sete por sete para que qualquer número dentro exceda os números em pelo menos cinco quadrados adjacentes? Poderíamos fazer um par com Wasik.
Oh, acho que me enganei 5 por 5: ainda não tenho esse exemplo.
 
Solução para o problema 343:

Não há nada de instrutivo nisso. Por isso, a propósito, é pouco provável que exista um contra-exemplo 5 por 5 :) Nem mesmo 4 por 4 vai funcionar... E o que uma folha de papel interminável tem a ver com isso? Um dado deliberadamente redundante introduzido de propósito?

A seguir (espero que a aula seja clara?):

Aparentemente, "um dos mais pesados" deve ser entendido sem ambigüidade: se houver vários mais pesados e o peso de cada um for o mesmo, escolhemos qualquer um.
 
Mathemat >>:
Решение задачи 343:

Ничего поучительного нет. Отсюда, кстати, следует, что контрпример 5 на 5 вряд ли существует :) Даже 4 на 4 не выйдет... И при чем тут бесконечный лист бумаги? Заведомо лишнее данное, внесенное специально?
Sim, não é bom. É uma pena o tempo desperdiçado :(

 

Desculpe, muito ocupado hoje e amanhã.
Mathemat, para que qualquer número dentro exceda os números em pelo menos 5 células vizinhas - não poderia imaginar isso.
-
Aqui está alguma literatura curiosa para "corromper" as crianças:
//vse-knigi.su/auth/4652
//letitbit.net/download/8997.8966b0876903/Oster-ZadachnikPoMatematike.rar.html
-
Camaradas moderadores, consertem finalmente os links.

 
Está tudo bem, Richie, tentaremos nos desenrascar sem você. Basta nos informar quando você estiver livre.
Há outro com pesos dentro:

P.S. Presume-se provavelmente que os pesos só podem ser colocados em um copo da balança. O outro tem um peso sobre ele.
Uma solução é óbvia: 1, 2, 4, 8, 16, 32.
 

Aqui está um programa engraçado para encontrar opções:
Suponha que tenhamos quatro pesos, por exemplo:
-
Dim MassaGiri1 As Long
Dim MassaGiri2 As Long
Dim MassaGiri3 As Long
Dim MassaGiri4 As Long
Private Sub Command1_Click()
For MassaGiri1 = 1 To 5
For MassaGiri2 = 1 To 5
For MassaGiri3 = 1 To 5
For MassaGiri4 = 1 To 5
If MassaGiri1 + MassaGiri2 + MassaGiri3 + MassaGiri4 = 2 * 3 Then
Print MassaGiri1, MassaGiri2, MassaGiri3, MassaGiri4
Fim Se
Próximo MassaGiri4
Próximo MassaGiri3
Próximo MassaGiri2
Próximo MassaGiri1
Fim Sub
-
Executar:

-
Escolha qualquer opção, digamos 1:
Então temos 3 pesos de 1 kg e um de 3 kg
.
-
1. Copo 1 =0 kg, copo 2 =0 kg;
2. No copo 1 colocamos 3 kg de peso;
3. No copo 2 colocamos 1 kg de peso;
4. No copo 2 colocamos 1 kg de peso;
5. No copo 2 colocamos 1 kg de peso;
-
O resultado é 3 kg em cada copo . Uma opção é comprovada.
-
Claro que entendo que uma fórmula é necessária, mas não há tempo agora.
Obviamente é apenas uma progressão em que cada termo sucessivo é igual à soma dos anteriores:
1, 2, 3, 6, 12 etc.

 

Aqui está o programa para a segunda tarefa, desculpe pelo código ruim, mas sem tempo:
-
Dim MassaGiri1 As Long
Dim MassaGiri2 As Long
Dim MassaGiri3 As Long
Dim MassaGiri4 As Long
Dim MassaGiri5 As Long
Dim MassaGiri6 As Long
Dim FileNo As Integer
Dim FileName As String
Dim Stroka As String
-
Private Sub Command1_Click()
FileName = "c:{Richi.txt".
FileNo = FreeFile
Open FileName For Output As FileNo
For MassaGiri1 = 1 To 32
For MassaGiri2 = 1 To 32
For MassaGiri3 = 1 To 32
For MassaGiri4 = 1 To 32
Para MassaGiri5 = 1 a 32
Para MassaGiri6 = 1 a 32
Se MassaGiri1 + MassaGiri2 + MassaGiri3 + MassaGiri4 + MassaGiri5 + MassaGiri6 = 63 Então
Se MassaGiri1 < MassaGiri2 Depois
Se MassaGiri2 < MassaGiri3 Depois
Se MassaGiri3 < MassaGiri4 MassaGiri4 Depois
Se MassaGiri4 < MassaGiri5 Depois
Se MassaGiri5 < MassaGiri6 Depois
Stroka = Str(MassaGiri1) & Str(MassaGiri2) & Str(MassaGiri3) & Str(MassaGiri4) & Str(MassaGiri5) & Str(MassaGiri6)
Imprimir #FileNo, Stroka
Fim Se
Fim Se
Fim Se
Fim Se
Fim Se
Fim Se
Próximo MassaGiri6
Próximo MassaGiri5
Próximo MassaGiri4
Próximo MassaGiri3
Próximo MassaGiri2
Próximo MassaGiri1
Fechar Arquivo No
Fim Sub

-
Imprime um arquivo de números consecutivos, cuja soma é 63. O número de escolhas é grande, o programa fica pendurado por um tempo.
Embora, não esteja muito claro o que significa "consecutivo".
Aqui está o início do arquivo (espaços substituídos por hífens):
-
1-2-3-4-21-32
1-2-3-4-22-31
1-2-3-4-23-30
1-2-3-4-24-29
1-2-3-4-25-28
1-2-3-4-26-27
1-2-3-5-20-32
1-2-3-5-21-31
1-2-3-5-22-30
1-2-3-5-23-29
1-2-3-5-24-28
1-2-3-5-25-27
1-2-3-6-19-32
1-2-3-6-20-31
1-2-3-6-21-30
1-2-3-6-22-29
1-2-3-6-23-28
1-2-3-6-24-27
1-2-3-6-25-26
1-2-3-7-18-32
1-2-3-7-19-31
1-2-3-7-20-30
1-2-3-7-21-29
1-2-3-7-22-28
1-2-3-7-23-27
1-2-3-7-24-26
1-2-3-8-17-32
1-2-3-8-18-31
1-2-3-8-19-30
1-2-3-8-20-29
1-2-3-8-21-28
1-2-3-8-22-27
1-2-3-8-23-26
1-2-3-8-24-25
1-2-3-9-16-32
1-2-3-9-17-31
1-2-3-9-18-30
1-2-3-9-19-29
1-2-3-9-20-28
1-2-3-9-21-27
1-2-3-9-22-26
1-2-3-9-23-25
1-2-3-10-15-32
1-2-3-10-16-31
1-2-3-10-17-30
1-2-3-10-18-29
1-2-3-10-19-28
1-2-3-10-20-27
......

Vejo vocês amanhã.

 

Aqui estão 4086 combinações (você tem que salvar o arquivo primeiro, então está tudo em uma linha):

Arquivos anexados:
richi.txt  68 kb
 
Richie, por que você não cuida de si mesmo, você trabalha tanto, por Deus, você escreve programas o tempo todo entre os trabalhos... É uma dor de cabeça, não é? Você não pode fazer isso. Enquanto isso, faremos uma pausa do ritmo frenético que você está estabelecendo.