2006, nivel 2, problema 2, nacional: ehh.....esta esto bien?

2006, nivel 2, problema 2, nacional: ehh.....esta esto bien?

Fixman 19 Nov 2007 18:30

Bueno, despues de estar un tiempo haciendo este problema me dió este resultado:

K es 5679
La clave es PARTUZA

Por alguna casualidad en el espacio tiempo mi programa dió un error que dió a … esta solución o asi es el resultado?

Les dejo el programa:

#include <stdio.h>
#include <conio.h>
 
int main()
{
    const int msg[] = {864, 5679, 2222, 3580, 9259, 7654, 5679} ;
    int j = 0 ;
    for (int i = 0 ; i < sizeof msg / sizeof (int) ; i++) j >?= msg[i] ;
 
    for (int k = 1 ; k <= j ; k++)
    {
        int let[30] ;
        for (int i = 'A' ; i <= 'Z' ; i++) let[i - 'A'] = ((i - 'A' + 1) * k) % 10000 ;
 
        for (int i = 0 ; i < sizeof (msg) / sizeof (int) ; i++)
        {
            for (int u = 0 ; u < 'Z' - 'A' + 1 ; u++) if (msg[i] == let[u]) goto si ;
            goto asd ;
 
            si:;
        }
        printf ("K es %d\nLa clave es ", k) ;
        for (int i = 0 ; i < sizeof (msg) / sizeof (int) ; i++) for (int u = 0 ; u < 'Z' - 'A' + 1 ; u++) if (let[u] == msg[i]) putchar (u + 'A') ;
        puts ("") ;
        getch() ;
        return 0 ;
 
        asd:;
    }
 
    printf ("La clave es invalida\n") ;
    getch() ;
    return 0 ;
}

Re: 2006, nivel 2, problema 2, nacional: ehh.....esta esto bien?

Rodrigo Belfiore 19 Nov 2007 19:27

Primero busco k, despues busco la palabra.
Para cada l, kupongo todos los k (entre 1 y 10000) y en kp (k posibles) voy guardando los valores posibles de k, si se cumple que n (letra de 1 a 28) por k (mod 10000) es el codigo.

Tengo algunas dudas sobre el lenguaje:
- Hay forma de meter los valores clave(1),clave(2),… mas rápida? (como en C)
- Como llamo a un Sub sólo si se cumple una condición (para no usar goto)

El código: (basic)

dim l,k,n,pk(10000),clave(7),letra(7)
clave(1)=864: clave(2)=5679: clave(3)=2222: clave(4)=3580:
clave(5)=9259: clave(6)=7654: clave(7)=5679

for l=1 to 7
    for k=1 to 10000
        if pk(k)=1 or l=1 then
            p=0
            for n = 1 to 28
                if (k*n) mod 10000=clave(l) then p=1
            next
            pk(k)=p
            if l=7 then goto buscopalabra
        end if
    next
next

buscopalabra:
for l=1 to 7
    for n = 1 to 28
        if (n*k) mod 10000=clave(l) then print chr(n+64);
    next
next

sleep

Resultado en pantalla: (asi no hay q compilarlo)

PARTUZA

Nos vemos :)

Re: 2006, nivel 2, problema 2, nacional: ehh.....esta esto bien?

Tavo92 19 Nov 2007 19:36

Primero que nada, NO USES GOTO! Son malas prácticas, horrendas por cierto.
Segundo, no entiendo que resultado te dio… ahora la cosa es saber si ese resultado, el que está mal porque PARTUZA está bien, te tira a veces o siempre. Si es a veces juego guita de que estás haciendo algunas cosas mal con los chars que hace que, a veces, cambie su resultado (Suele pasar que si tocás mal los chars te tiran resultados locos).