Skocz do zawartości

[Pascal] Zadanie OPSS


X3o

Polecane posty

Jest owe zadanie:

 

http://opss.safo.biz/?menu=comp&sub=prob&prob=1002&comp=0

 

Napisałem to tego taki "coś":

 

PROGRAM Dzialki;
VAR
 a, b, i, n : longint;
BEGIN
ReadLn(a);
ReadLn(b);
IF (0<a) AND (a<=5) AND (0<b) AND (b<=10) THEN
 Begin
  n:=1;
  FOR i:=1 TO b DO
   n:=n*a;
  WriteLn(n);
 End;
END.

 

I co jest źle że OPSS tego nie przyjmuje ? Mógłby mi ktoś to wytłumaczyć jak to trzeba pisać aby zadziałało :)

 

Bo dla podanych danych wyniki są poprawne :)

 

Pozdrawiam! :)

Link do komentarza
Udostępnij na innych stronach

Przecież to jest zupełnie niezgodne z treścią zadania. W pierwszej linii masz wczytać liczbę "n", a nie "a". Ta instrukcja warunkowa jest zbędna - nie musisz sprawdzać czy liczby będą sie zgadzać bo będą.

 

-Edit-

A tak w ogóle to ty masz główkować - nie my ;) Na tym polega cała zabawa.

Link do komentarza
Udostępnij na innych stronach

Jason: a to nawet dobry pomysl jest :)

 

X3o: Jesli uczestniczysz w olimpiadzie to znaczy ze umiesz programowac, jesli cos ci nie dziala to znaczy ze masz zle a jesli uwarzasz ze powino ci to dzialac to zglos to osoba ktore organizuja olimipade.

 

Jesli ktos uczestniczy w olimiadzie to powinien rozwiazywac zadania samodzielnie!!!!!!

Link do komentarza
Udostępnij na innych stronach

Zarchiwizowany

Ten temat jest archiwizowany i nie można dodawać nowych odpowiedzi.

Gość
Temat jest zablokowany i nie można w nim pisać.
×
×
  • Utwórz nowe...