|
Informatyka UJ forum Rocznik 2005 - czyli najlepsze forum w sieci
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Rogal
Zjeb z kaszanką
Dołączył: 13 Mar 2006
Posty: 1745
Przeczytał: 0 tematów
Skąd: koło podbiegunowe
|
Wysłany: Śro 0:52, 05 Lip 2006 Temat postu: |
|
|
hansu napisał na 150.
edited: To pochwal się swoim kodem. Jestem ciekaw czy można to zrobić jeszcze inaczej niż ja i hansu.
Ostatnio zmieniony przez Rogal dnia Śro 0:55, 05 Lip 2006, w całości zmieniany 1 raz
|
|
Powrót do góry |
|
|
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Yoter
zielony żul
Dołączył: 19 Lis 2005
Posty: 1033
Przeczytał: 0 tematów
Skąd: Gościeradów
|
Wysłany: Śro 0:54, 05 Lip 2006 Temat postu: |
|
|
o jeden znak gorszy od hansa.... :shock:
edited: no to masz...
uses
crt;
var
x,y,a,b,g,h:byte;
begin
h+=1;
x:=40;
y:=12;
repeat
a+=1;
g+=h;
h-=g;
g+=h;
for
b:=1
to
a
div
2do
begin
gotoxy(x,y);
write('x');
x+=g;y+=h;
delay(9)
end
until
y=0
end.
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Rogal
Zjeb z kaszanką
Dołączył: 13 Mar 2006
Posty: 1745
Przeczytał: 0 tematów
Skąd: koło podbiegunowe
|
Wysłany: Śro 0:58, 05 Lip 2006 Temat postu: |
|
|
Ok, jeśli kogoś interesuje moje rozwiązanie to wygląda on tak:
Kod: | uses
crt,math;
var
x,y:int64;
begin
Repeat
GotoXY(40+x,12+y);
Write('x');
if
abs(x+0.2)<abs(y+0.2)
then
x+=Sign(y+0.5)
else
y-=Sign(x+0.5);
delay(9)
until
y=-12
end. |
Chętnie zobaczyłbym kody innych bo jestem ciekaw jak jeszcze można było to zrobić.
edited: Yoter zrobił to jeszcze inaczej :wink:
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Yoter
zielony żul
Dołączył: 19 Lis 2005
Posty: 1033
Przeczytał: 0 tematów
Skąd: Gościeradów
|
Wysłany: Śro 1:03, 05 Lip 2006 Temat postu: |
|
|
hmmm ciekawy kod... ja teraz przeliczyłem swój kod jeszcze raz (tym razem już nie wg wzorku rozmiar - linie*2, tylko znak po znaku) i mi wyszło 153... więc cukierka nie będzie :D
edit: cholera, tego signa mi brakowało...
edit2: a nie wiem czy wiesz Rogal, ale to się da zrobić na wiele wiele sposobów m.in. rekurencyjnie czy za pomocą współrzędnych biegunowych (tak to się nazywa?)... być może jeszcze jutro coś pokombinuję z moimi kodami, zobaczę czy uda mi się stworzyć coś jeszcze krótszego... (wersji tej spiralki to ja mam chyba kilkanaście już....)
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Makros
pijak
Dołączył: 01 Gru 2005
Posty: 420
Przeczytał: 0 tematów
Skąd: Kraków
|
Wysłany: Śro 15:35, 05 Lip 2006 Temat postu: |
|
|
moje wyglada tak:
Kod: | uses
crt;
var
x,y,i,r,z:word;
BEGIN
x:=40;
y:=12;
repeat
gotoxy(x,y);
write('x');
delay(9);
x+=(r
mod
4-2)mod
2;
y+=(r
mod
4-1)mod
2;
i+=-i*z+1;
z:=i
div(r
div
2+1);
r+=z
until
y=0
END. |
... :)
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
exeman
Mistrz grilla
Dołączył: 03 Lut 2006
Posty: 1603
Przeczytał: 0 tematów
Skąd: znienacka
|
Wysłany: Śro 16:23, 05 Lip 2006 Temat postu: |
|
|
Oficjalne wyniki beda o 17:00
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
exeman
Mistrz grilla
Dołączył: 03 Lut 2006
Posty: 1603
Przeczytał: 0 tematów
Skąd: znienacka
|
Wysłany: Śro 16:42, 05 Lip 2006 Temat postu: |
|
|
No i są wyniki:
[link widoczny dla zalogowanych]
Kod: |
And the winner is:
Rogal:
Rogal - 1 - July 3, 2006, 6 14 pm.pas -> (1)148
Rogal - 2 - June 29, 2006, 10 30 am.pas -> (2)0
Output:
hansu - 1 - July 4, 2006, 2 04 am.pas -> (1)151
hansu - 2 - June 29, 2006, 1 26 am.pas -> (2)0
insane - 2 - June 29, 2006, 3 29 pm.pas -> (2)0
Madras - 2 - June 29, 2006, 9 49 am.pas -> (2)10
Madras - 2 - June 29, 2006, 9 50 am.pas -> (2)0
makros - 1 - July 4, 2006, 9 08 pm.pas -> (1)167
makros - 2 - June 29, 2006, 10 10 am.pas -> (2)10
Makros - 2 - June 29, 2006, 3 08 pm.pas -> (2)0
Robson - 2 - June 29, 2006, 1 48 am.pas -> (2)0
Rogal - 1 - July 2, 2006, 12 12 am.pas -> (1)153
Rogal - 1 - July 3, 2006, 6 14 pm.pas -> (1)148
Rogal - 2 - June 29, 2006, 10 24 am.pas -> (2)10
Rogal - 2 - June 29, 2006, 10 30 am.pas -> (2)0
Rogal - 2 - June 29, 2006, 12 31 am.pas -> (2)40
Rogal - 2 - June 29, 2006, 12 51 am.pas -> (2)40
Spectro - 2 - June 29, 2006, 10 52 am.pas -> (2)[ANS]
Yoter - 1 - July 4, 2006, 12 39 am.pas -> (1)157
Yoter - 2 - June 29, 2006, 11 23 am.pas -> (2)0
|
Gratuluje Rogalowi za zwycieztwo (drugie z kolei!), oraz wszystkim ktorzy brali udzial w konkursie :)
Niedlugo kolejny etap, tym razem duzo ciekawszy :)
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Spectro
Mistrz grilla
Dołączył: 09 Mar 2006
Posty: 2306
Przeczytał: 0 tematów
Skąd: Kurdwanów
|
Wysłany: Śro 16:59, 05 Lip 2006 Temat postu: |
|
|
Kod: | Spectro - 2 - June 29, 2006, 10 52 am.pas -> (2)[ANS] |
Ostatni raz wysłałem jakiś program przez lynxa :P .
edit: Insane i hansu chyba ściągali w zadaniu 2 ;) . A mój program do zadania 2 to była wersja z plusami :) .
Ostatnio zmieniony przez Spectro dnia Śro 17:03, 05 Lip 2006, w całości zmieniany 1 raz
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
exeman
Mistrz grilla
Dołączył: 03 Lut 2006
Posty: 1603
Przeczytał: 0 tematów
Skąd: znienacka
|
Wysłany: Śro 17:02, 05 Lip 2006 Temat postu: |
|
|
Spectro: Lynx to super program, ale najnowszych ficzerow on nie posiada (w tym jak widac uploadowania plikow). Kiedys byl taki motyw, ze ktos chcial wejsc na swoje konto w banku przez lynxa i zostalo to wykryte jako proba wlamania :P
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Spectro
Mistrz grilla
Dołączył: 09 Mar 2006
Posty: 2306
Przeczytał: 0 tematów
Skąd: Kurdwanów
|
Wysłany: Śro 17:07, 05 Lip 2006 Temat postu: |
|
|
exeman napisał: | Kiedys byl taki motyw, ze ktos chcial wejsc na swoje konto w banku przez lynxa i zostalo to wykryte jako proba wlamania |
No to spoko ;] . Warto wiedzieć na przyszłość. A spiralki nie wysłałem, bo ciągle pracuję nad moim dużym projektem z P1 ;] .
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
hansu
Nieomylny Admin
Dołączył: 17 Lis 2005
Posty: 1990
Przeczytał: 0 tematów
Skąd: przychodzimy? Czym jestesmy? Dokad zmierzamy?
|
Wysłany: Śro 17:29, 05 Lip 2006 Temat postu: |
|
|
No i znowu kurna drugie miejsce... :( Gratuluje Rogalowi swietnego pomyslu do spiralki oraz zauwazenia luki w zadaniu 2 :P (bo tak naprawde + tez powinien byc znakiem punktowanym - bez tego zadanie jest obrazliwie trywialne ;)). No nic, z nieceirpliwoscia czekam na kolejny etap :)
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Yoter
zielony żul
Dołączył: 19 Lis 2005
Posty: 1033
Przeczytał: 0 tematów
Skąd: Gościeradów
|
Wysłany: Śro 17:56, 05 Lip 2006 Temat postu: |
|
|
e tam przesadzasz hans :D gdyby nie ta luka to pewnie w ogóle nie zainteresowałbym się tym zadaniem a co za tym idzie spiralką.... gratuluję Rogalowi (który btw. jest ZLYYYYYYYYYY ==") i czekam na trzecią edycję.... ;)
ps. jedyny plus z tego że Rogal wygrał to to, że może wreszcie nauczy się śpiewać :D
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Rogal
Zjeb z kaszanką
Dołączył: 13 Mar 2006
Posty: 1745
Przeczytał: 0 tematów
Skąd: koło podbiegunowe
|
Wysłany: Śro 18:01, 05 Lip 2006 Temat postu: |
|
|
Dajcie kolejne zadania :D
A tak wogóle to mam nadzieję, że w końcu ktoś poza mną się weźmie do roboty to byśmy mogli chórek zrobić na najbliższym grillu :lol:
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
exeman
Mistrz grilla
Dołączył: 03 Lut 2006
Posty: 1603
Przeczytał: 0 tematów
Skąd: znienacka
|
Wysłany: Śro 18:23, 05 Lip 2006 Temat postu: |
|
|
Rogal, jako, ze drugi raz z rzedu zajales pierwsze miejsce, jako organizator postanawiam wreczyc Ci dodatkowa nagrode, a jest nia:
Obowiazek zaspiewania piosenki MIG - Prawda, na publicznym grillu naszego roku ;]
[link widoczny dla zalogowanych]
Tak tak, wiem, ze sie cieszysz, nie musisz dziekowac :P
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Rogal
Zjeb z kaszanką
Dołączył: 13 Mar 2006
Posty: 1745
Przeczytał: 0 tematów
Skąd: koło podbiegunowe
|
Wysłany: Śro 18:30, 05 Lip 2006 Temat postu: |
|
|
Czuję się zaszczycony :D
Ale przydałąby się jakaś kapela.
PS. czy mam obowiązek wykonywania układu choreograficznego? :twisted:
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
exeman
Mistrz grilla
Dołączył: 03 Lut 2006
Posty: 1603
Przeczytał: 0 tematów
Skąd: znienacka
|
Wysłany: Śro 18:36, 05 Lip 2006 Temat postu: |
|
|
Zdecydowanie tak :P
Co do kapeli - pewnie bedzie wiele etapow konkursu zanim odbedzie sie jakis wspolny grill, zatem mozliwe, ze sie chorek uzbiera ;)
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Yoter
zielony żul
Dołączył: 19 Lis 2005
Posty: 1033
Przeczytał: 0 tematów
Skąd: Gościeradów
|
Wysłany: Śro 19:17, 05 Lip 2006 Temat postu: |
|
|
hej Rogal to teraz masz motywację żeby więcej nie wygrywać :D
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Rogal
Zjeb z kaszanką
Dołączył: 13 Mar 2006
Posty: 1745
Przeczytał: 0 tematów
Skąd: koło podbiegunowe
|
Wysłany: Śro 20:20, 05 Lip 2006 Temat postu: |
|
|
@Yoter: To Wy macie motywację żeby wygrać... w końcu ktoś będzie mnie musiał słuchać a na pewno nie będzie to przyjemne :twisted:
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Yoter
zielony żul
Dołączył: 19 Lis 2005
Posty: 1033
Przeczytał: 0 tematów
Skąd: Gościeradów
|
Wysłany: Śro 20:22, 05 Lip 2006 Temat postu: |
|
|
dla mnie motywacją zawsze było jest i będzie piwo tesco :D
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Rogal
Zjeb z kaszanką
Dołączył: 13 Mar 2006
Posty: 1745
Przeczytał: 0 tematów
Skąd: koło podbiegunowe
|
Wysłany: Śro 20:27, 05 Lip 2006 Temat postu: |
|
|
@Yoter: To muszę Cię zmartwić, ostatnio były Żywce :wink:
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Yoter
zielony żul
Dołączył: 19 Lis 2005
Posty: 1033
Przeczytał: 0 tematów
Skąd: Gościeradów
|
Wysłany: Śro 21:00, 05 Lip 2006 Temat postu: |
|
|
ooooooooooooooooołłłłłłłłłłłłł..... :(
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
exeman
Mistrz grilla
Dołączył: 03 Lut 2006
Posty: 1603
Przeczytał: 0 tematów
Skąd: znienacka
|
Wysłany: Śro 21:36, 05 Lip 2006 Temat postu: |
|
|
Yoter: Jak wygrasz, na 100% bedzie TESCO :P
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
Yoter
zielony żul
Dołączył: 19 Lis 2005
Posty: 1033
Przeczytał: 0 tematów
Skąd: Gościeradów
|
Wysłany: Śro 22:32, 05 Lip 2006 Temat postu: |
|
|
JEŚLI wygram.... :)
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
ostoj
Przewijak Tasmy
Dołączył: 08 Lis 2005
Posty: 883
Przeczytał: 0 tematów
Skąd: Tychy
|
Wysłany: Śro 23:35, 05 Lip 2006 Temat postu: |
|
|
swoja droga, to jaka exeman miales wersje zadania drugiego na mysli? w sensie na jakie rozwiazania czekales? bo na pewno nie na plusy.. :)
|
|
Powrót do góry |
|
|
Zobacz poprzedni temat :: Zobacz następny temat |
Autor |
Wiadomość |
exeman
Mistrz grilla
Dołączył: 03 Lut 2006
Posty: 1603
Przeczytał: 0 tematów
Skąd: znienacka
|
Wysłany: Śro 23:46, 05 Lip 2006 Temat postu: |
|
|
Moja wzorcowka:
Kod: |
begin
for exitcode:=1 to 15 do
write(chr(byte(exitcode=1)*108+byte(exitcode=2)*
117+byte(exitcode=3)*98+byte(exitcode=4)*
105+byte(exitcode=5)*101+byte(exitcode=6)*
32+byte(exitcode=7)*116+byte(exitcode=8)*
114+byte(exitcode=9)*117+byte(exitcode=10)*
115+byte(exitcode=11)*107+byte(exitcode=12)*
97+byte(exitcode=13)*119+byte(exitcode=14)*
107+byte(exitcode=15)*105))
end.
|
Nic nie mowcie :P
|
|
Powrót do góry |
|
|
|
|
Nie możesz pisać nowych tematów Nie możesz odpowiadać w tematach Nie możesz zmieniać swoich postów Nie możesz usuwać swoich postów Nie możesz głosować w ankietach
|
fora.pl - załóż własne forum dyskusyjne za darmo
Powered by phpBB © 2001, 2005 phpBB Group
|