Toster Napisano Luty 8, 2006 Zgłoś Share Napisano Luty 8, 2006 Na forum tym widze same pytania i odpowiedzi, wiec dla niepoznaki postanowilem wrzucic mala ciekawostke. Zabawa polega na tym aby popatrzec na program podany na konc postu i odpowiedziec na bardzo proste pytanie. Ile wynosi wartosc zmiennej y na koncu ? (wartos przekazana do showmessage). Caly myk polega na tym aby najpierw przeanalizowac poroblem i dac odpowiedz pozniej ewentualnie wrzucic go do Delphi i zobaczyc czy sie mialo racje. Pytanie brzmi: Ile wynosi y ?a) 2000b) 1000c) losowa wartosca oto program: [code=Delphi] function sprawdz(var count: integer):Boolean; begin IĘ[ NYZXH][YCB[&ćFfwCłSŚVćC&6VGW&RDf&Ó'WGF6Ć66Q=4)4(ąŃ4(ą4) Randomize; y := 0; for t := 1 to 1000 do begin H]JNBH[]JNB6FŁ&F7G\"\"VćC6tW76vREF7G\"4)4 [/code] Always Dark<br /> Link do komentarza Udostępnij na innych stronach More sharing options...
Iskar Napisano Luty 8, 2006 Zgłoś Share Napisano Luty 8, 2006 Przyznam, że nie przeanalizowałem do końca i dałem złą odpowiedź :> ale zadanie bardzo fajne, proste, ale podchwytliwe czekam na następne a może i sam coś wymyślę. Link do komentarza Udostępnij na innych stronach More sharing options...
Jason Napisano Luty 8, 2006 Zgłoś Share Napisano Luty 8, 2006 Szkoda, że takich pytań nie ma na OI :twisted: Link do komentarza Udostępnij na innych stronach More sharing options...
oksal Napisano Luty 8, 2006 Zgłoś Share Napisano Luty 8, 2006 Tez poleglem...Stawialem na 3/4 z 1000...Inaczej mowiac nadal nie rozumiem "komputera"...Stad pewnie tak często wymyka mi się z pod kontroli pozdrawiam oksal Link do komentarza Udostępnij na innych stronach More sharing options...
sazian Napisano Luty 8, 2006 Zgłoś Share Napisano Luty 8, 2006 to jest dziwne włączyłem delbg i nie wiem jak to działa Link do komentarza Udostępnij na innych stronach More sharing options...
5corpio Napisano Luty 8, 2006 Zgłoś Share Napisano Luty 8, 2006 też postawiłem na 1k niestety przegrałem. Toster może jakoś lekko wytłumaczysz cały haczyk bo ja średnio to rozumiem ? Ot taka mini-strona moja po godzinach http://www.wnetrzekuchni.pl Link do komentarza Udostępnij na innych stronach More sharing options...
Iskar Napisano Luty 8, 2006 Zgłoś Share Napisano Luty 8, 2006 Nie, stop! żadnych tłumaczeń, nie psujmy innym zabawy! ;-) Rozwiązanie jest proste, pokombinujcie, poeksperymentujcie ;-) Link do komentarza Udostępnij na innych stronach More sharing options...
Kezard Napisano Luty 8, 2006 Zgłoś Share Napisano Luty 8, 2006 A mi sie udało udzielić poprawnej odpowiedzi Link do komentarza Udostępnij na innych stronach More sharing options...
krajew4 Napisano Luty 9, 2006 Zgłoś Share Napisano Luty 9, 2006 Hm, odpowiedź jest prosta, wystarczy chwilę poanalizować kod :shock: My life for Aiur! Link do komentarza Udostępnij na innych stronach More sharing options...
Toster Napisano Luty 10, 2006 Autor Zgłoś Share Napisano Luty 10, 2006 He he program jest prosty jak drut jak sie wie na czym polega optymalizacja operatorow logicznych ;) Poeksperymentujcie w ustawieniach kompilera dajcie Complete Bool eval (czy jakos tak) zmieni sie odpowiedz ;)Jak ktos dalej nie bedzie czail to niech do mnie napisze maila postaram sie odpowiedziec w miare jasno. Jak mi wpadnie cos nowego do glowy to dorzuce :) Always Dark<br /> Link do komentarza Udostępnij na innych stronach More sharing options...
Toster Napisano Marzec 1, 2006 Autor Zgłoś Share Napisano Marzec 1, 2006 Kolejna zagadka dla dociekliwych, pytanie brzmi jaka liczbe wyswietli ta procka ?a) 10b) -NAN(nieskonczonosc) + Range Check Errorc) 54procka: [code=Delphi] procedure test; var t,y,u: integer; begin u := 1BHHBHHHY[BHHH ŁVćC6tW76vREF7G\"4( [/code] Always Dark<br /> Link do komentarza Udostępnij na innych stronach More sharing options...
sazian Napisano Marzec 1, 2006 Zgłoś Share Napisano Marzec 1, 2006 a to jest prose Link do komentarza Udostępnij na innych stronach More sharing options...
Iskar Napisano Marzec 1, 2006 Zgłoś Share Napisano Marzec 1, 2006 Tym razem dobrze ;-) prostsze od poprzedniego, ale też fajne. Czekam na następne. Link do komentarza Udostępnij na innych stronach More sharing options...
ktoś Napisano Marzec 1, 2006 Zgłoś Share Napisano Marzec 1, 2006 to akurat było łatwe.Niecierpliwie czekam na następne edit:Scorpio: ja też miałem wątpliwość, bo spodziewałem się podpuchy, ale po wrzuceniu do delphi okazało się, że udzieliłem dobrej odpowiedzi Link do komentarza Udostępnij na innych stronach More sharing options...
5corpio Napisano Marzec 1, 2006 Zgłoś Share Napisano Marzec 1, 2006 a ja miałem dziwną wątpliwość ale oczywiście teraz udało mi się udzielić poprawnej odpowiedzi. Ot taka mini-strona moja po godzinach http://www.wnetrzekuchni.pl Link do komentarza Udostępnij na innych stronach More sharing options...
HNB Napisano Marzec 2, 2006 Zgłoś Share Napisano Marzec 2, 2006 To teraz ja . Ile Wynosi x.ODPOWIEDZI:a) 4294967295 program wywali sięc) $FFFFFFFFe) ELSE [code=Delphi] program HNB_Q; {$APPTYPE CONSOLE} var x: LongWord; y:[B[YBY[BHHB[ĘW f\"ŁF\"F&Vvć2ć2#SR4(4(]Ń1Ą4(I14)4( [/code]Pozdrawiam soon Delphi will be only for veterans and finally we all will die at the end… delphi.dathox.com - nowinki z świata Delphi/Pascala only programmers and drug dealers call their customers "users" Oto cisza przed burzą, Chwile się dłużą.Z gór schodzi dużo chmur ku podnóżom.Ptaki milaczą, drogi suche jak wiór się kurzą, Ptaki milczą a drogi się kurzą. Link do komentarza Udostępnij na innych stronach More sharing options...
Toster Napisano Marzec 2, 2006 Autor Zgłoś Share Napisano Marzec 2, 2006 Brakuje odpowiedzi d) zadne z powyzszych. [b]Pozatym odpowiedz a i c sa sobie rownowazne ;) Always Dark<br /> Link do komentarza Udostępnij na innych stronach More sharing options...
Iskar Napisano Marzec 5, 2006 Zgłoś Share Napisano Marzec 5, 2006 Czas na moją zagadkę: [code=Delphi] procedure TForm1.Button2Click(Sender: TObject); var c , c2 BY[BH ŃIBH BH[VvW\"f6\"FVvW\"3\"6tW76vRf6ŚVćC [/code]Jaki zobaczymy komunikat? Nie podaje możliwych odpowiedzi, bo pewnie nasunełyby one poprawną odpowiedź. Jeśli ktoś chce wyjaśnienie - PW ;-)// ale nie schodźmy z tematu i rozważajmy, że jednak jest tam ' ' ;-) Link do komentarza Udostępnij na innych stronach More sharing options...
sazian Napisano Marzec 5, 2006 Zgłoś Share Napisano Marzec 5, 2006 jak w c2 wpisze się "F" to jest ciekawiej Link do komentarza Udostępnij na innych stronach More sharing options...
Iskar Napisano Marzec 8, 2006 Zgłoś Share Napisano Marzec 8, 2006 Nowa zagadka: [code=Delphi] procedure TForm1.Button3Click(Sender: TObject); var i , X[[BH]HBY[BHHBHH 3#scf\"ŁFvFFć2Ą5Ą%ŃQMŃĄ4) [/code]Jaki zobaczymy komunikat? a). kod w ogóle się nie skompiluje. 0 c). 1 d). zobaczymy komunikat o błędzie po naciśnięciu przycisku e). 255 f). 256 g). 32768 h). -32768 i). żadne z powyższych Link do komentarza Udostępnij na innych stronach More sharing options...
5corpio Napisano Marzec 8, 2006 Zgłoś Share Napisano Marzec 8, 2006 No nie na początku wybrałem odpowiedź, że pokaże X a zmieniłem zdanie na Y i się oczywiście pomyliłem :]// Wyciąłem fragmenty, żeby nie zepsuć innym zabawy ;-) btw: nie piszcie, jaka odp. jest poprawna, niech inni też mają zagadke - Iskar Ot taka mini-strona moja po godzinach http://www.wnetrzekuchni.pl Link do komentarza Udostępnij na innych stronach More sharing options...
ktoś Napisano Marzec 8, 2006 Zgłoś Share Napisano Marzec 8, 2006 okurde... jak to działa? To ma jakiś związek z zakresem liczbowym różnych zmiennych?tj. czy to będzie coś tego typu jak np. przy przypisaniu wartości zmiennej integer do zmiennej byte? (wynik taki sam, jak przy byte := integer mod 226)wyjaśnisz mi jak to działa? A swoją drogą, to jakieśwyjaśnienie do poprzedniej zagadki też by się przydało // zaraz dostaniesz PW ;-) - Iskar Link do komentarza Udostępnij na innych stronach More sharing options...
Iskar Napisano Kwiecień 18, 2006 Zgłoś Share Napisano Kwiecień 18, 2006 Nowa zagadka: [code=Delphi] procedure TForm1.Button1Click(Sender: TObject); var p : BH[YBY[BHHMBHHć26tW76vRŚVćC [/code]Co zobaczymy na ekranie?a). Nic - kod się w ogóle nie skompiluje,. Losową (nie możliwą do odgadnięcia) wartość,c). "Krzak",d). znak '!',e). znak 'A',f). znak 'a',g). inny znak. Link do komentarza Udostępnij na innych stronach More sharing options...
Toster Napisano Kwiecień 19, 2006 Autor Zgłoś Share Napisano Kwiecień 19, 2006 Proste ale ciekawe ;)// ;] Always Dark<br /> Link do komentarza Udostępnij na innych stronach More sharing options...
5corpio Napisano Kwiecień 23, 2006 Zgłoś Share Napisano Kwiecień 23, 2006 Źle :/ ale przynajmniej chyba rozumiem już zasadę. Ot taka mini-strona moja po godzinach http://www.wnetrzekuchni.pl Link do komentarza Udostępnij na innych stronach More sharing options...
Polecane posty
Zarchiwizowany
Ten temat jest archiwizowany i nie można dodawać nowych odpowiedzi.