Prolog - solving TEST with readln

In SWI Prolog using readln the way you do it will create a one element list [n] rather than a scalar value.

Unfortunately, this is so. I would recommend downloading SWI Prolog for Windows, it really has a nice IDE to work with (http://www.swi-prolog.org/1).

program :- readln(X), check(X). 
check([42]):-!. 
check([X]):-write(X),nl, readln(Z),check(Z).

We don't offer a search-by-language function (perhaps we should), but you can browse through (or google) the ranks of any problem in search of 'prolog'.

At present this is a complete list of problems solved in prolog:
ADDREV
DYZIO
KAMIL
MARBLES
MAYA
ONP
TEST
TREE1

But I'm sure that more than 50 problems (most of those without the "large i/o" warning) can be solved in prolog if you try hard enough .

Hi,

I've tried

program :- readln(X), check(X).
check([X]):-dif(X,42), write(X),nl, readln(Z),check(Z).
check([42]).

(it's ok with swi)
it failed with spoj!
why?

I've also tried (Small factorials Problem code: FCTRL2)

program :- readln([K]), facs(K).
facs(0).
facs(K):- K>0, readln([N]), fac(N,R), write(R), nl, L is K-1, facs(L).
fac(0,1).
fac(N,F):- N>0,  M is N-1, fac(M,E), F is E*N.

(it's ok with swi)
it failed too with spoj!
why?

Finally, I've had a 'nl' at the end, and it works !

program :- readln(X), check(X).
check([X]):-dif(X,42), write(X),nl, readln(Z),check(Z).
check([42]):-nl.

BDenis.

idem for the second problem, a 'nl' at the end ...

program :- readln([K]), facs(K).
facs(0):-nl.
facs(K):- K>0, readln([N]), fac(N,R), write(R), nl, L is K-1, facs(L).
fac(0,1).
fac(N,F):- N>0,  M is N-1, fac(M,E), F is E*N.

BDenis.

Hello all.......
I will try to your suggestion...
Thankssssss......
best way to get rid of acne

Poproszę o jakieś testy poprawnościowe do w/w zadania.

Z programem, który dostał AC:

Wejście:

OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOX
XOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
OOOOOOOOOOOZOOOOOOOOOZOOOOOOOOOZOOOOOOOOOZOOOOOOOOOZOOOOOOOOOZOOOOOOOOOZOOOOOOOOOZZZZZZZZZOOOOOOOOOO

Uwaga: W ostatnim przykładzie należy zamienić wszystkie Z na X.

Wyjście:

0
0
1

Wszystkie test dały mi poprawną poprawną odpowiedź, tj. identyczną ja wyżej podana. Może mam coś źle z wczytywaniem, spojrzy ktoś?

char tab[10][10];
    string a;
    while (cin>>a)
    {
        for (int i = 0; i < 10; i++)
        {
            for (int j = 0; j < 10; j++)
            {
                int z = 10*i+j;
                tab[i][j] = a[z];
            }
        }
        // tu coś się dzieje :P
     }

Czesc odświeżam temat czy ktoś mógłby wrzucić więcej testów do tego zadania, mój program przechodzi wszystkie testy jakie tylko wymyślę ale ciągle WA, bardzo proszę o pomoc>

Też jeszcze nie udało mi sięrozwiązać tego zadania, ale oto testy mojego autorstwa (może też podalibyście wasze testy, nawet jeśli nie zaliczyliście tego zadania, bo mogłoby to pomóc innym):
Input:

OOOXOOOXOOXXOXOXOXOOOXOOOXOXOOOXXXXXOXOOOOOXOOOXOOOXOXOXXXOOOXOOOXOOOOOXXXXXOXXOOOXOOOOOXOXOOOXXXXXO
OOOOOOOOOOXXOXXXXOXOOOOOOOXOOOOOOOOOXXXXOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
OOOOOOOOOOXXXXXXXXXOXOOOXOOOXOXOXOXOXOXOXOOOXOOOXOXOXOOOXOOOXOXOXOXOXOXOXOOOXOOOXOXXXXXXXXOOOOOOOOOO
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOXXXXOXXXXXOOOOOOOOOOXXXXXXXXXOOOOOOOOOOOOXXXXXXXXXOOOOOOOOOO
OOXOXOXOXOXOOOOOOOOOXOXOXOXOXOOOOOOOOOOOXOXOXOXOXOOOOOOOOOOOXOXOXOXOXOOOOOOOOOOOXOXOXOXOOXOOOOOOOOXO
OXOXOXOXOXOOOOOOOOOOOXOXOXOXOXOOXOOOOOOOOXXXXXXXXXOXOXOOOXOOOOXOOXOOXOOXOXOXXOOOOOXOOOOXOXOOOOXOXOOO

Output:

1
1
1
1
0
1

Jak ktoś ma jeszcze inne podchwytliwe testy, to dorzucam się do prośby.

dlaczego pozostałe labirynty są oznaczone jako [SPAM]??

Wydaje mi się, że skrypt traktuje ciąg trzech X, jako link do stron pornograficznych, a w tych testach było dużo X

jawa350: zamiast na gg, wrzucę Ci tu, bo nie podaję gg każdemu, kto poprosi (bez urazy), a tak to inni też skorzystają

tiny.pl/hqqcg

//Jakby komuś to pomogło, to można spróbować to zrobić metodą prawej-lewej ręki
dodatkowe linki pomocnicze:
tiny.pl/hq1sg
tiny.pl/hq1st