FAQ
•
Szukaj
•
Użytkownicy
•
Grupy
•
Galerie
•
Rejestracja
•
Profil
•
Zaloguj się, by sprawdzić wiadomości
•
Zaloguj
Napisz odpowiedź
Forum TIBIA forum Strona Główna
»
O wszystkim i o niczym
» Napisz odpowiedź
Napisz odpowiedź
Użytkownik:
Temat:
Treść wiadomości:
Emotikony
Więcej Ikon
Kolor:
Domyślny
Ciemnoczerwony
Czerwony
Pomarańćzowy
Brązowy
Żółty
Zielony
Oliwkowy
Błękitny
Niebieski
Ciemnoniebieski
Purpurowy
Fioletowy
Biały
Czarny
Rozmiar:
Minimalny
Mały
Normalny
Duży
Ogromny
Zamknij Tagi
Opcje:
HTML:
NIE
BBCode
:
TAK
Uśmieszki:
TAK
Wyłącz BBCode w tym poście
Wyłącz Uśmieszki w tym poście
$1
Kod potwierdzający:
$3
Przegląd tematu
<table border="0" cellpadding="3" cellspacing="1" width="100%" class="forumline"> <tr> <th width="22%">Autor</th> <th>Wiadomość</th> </tr> <tr> <td width="22%" valign="top" class="row1"><span class="name"><a name="" id=""></a>pan wiesiek</span> <br /> <img src="http://picsrv.fora.pl/fiblack/images/spacer.gif" alt="" width="150" height="1" /></td> <td class="row1" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td><img src="http://picsrv.fora.pl/fiblack/images/icon_minipost.gif" width="12" height="9" class="imgspace" alt="Post" title="Post" /><span class="postdetails">Wysłany: Czw 15:22, 08 Mar 2007 Temat postu: </span></td> </tr> <tr> <td><hr /></td> </tr> <tr> <td class="postbody">fajna masz stara</td> </tr> </table> </td> </tr> <tr> <td colspan="2" height="1" class="spacerow"><img src="http://picsrv.fora.pl/fiblack/images/spacer.gif" alt="" width="1" height="1" /></td> </tr> <tr> <td width="22%" valign="top" class="row2"><span class="name"><a name="" id=""></a>Twoja</span> <br /> <img src="http://picsrv.fora.pl/fiblack/images/spacer.gif" alt="" width="150" height="1" /></td> <td class="row2" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td><img src="http://picsrv.fora.pl/fiblack/images/icon_minipost.gif" width="12" height="9" class="imgspace" alt="Post" title="Post" /><span class="postdetails">Wysłany: Pon 10:54, 22 Sty 2007 Temat postu: Stara</span></td> </tr> <tr> <td><hr /></td> </tr> <tr> <td class="postbody">program losoweodcinki; <br /> <br />uses <br /> Crt, Graph; <br /> <br />var <br /> n,i:integer ; <br /> l,suma,max,min,srednia:real; <br /> xp,yp,xk,yk:integer; <br /> Tryb : integer; <br /> Driver : Integer; <br /> <br />begin <br /> writeln('podaj ilosc odcinkow'); <br /> readln(n); <br /> randomize; <br /> i:=1; <br /> suma:=0; <br /> max:=0; <br /> min:=getmaxx; <br /> Driver := Detect; <br /> InitGraph(Driver, Tryb, ''); <br /> <br /> for i:=1 to n do <br /> begin <br /> xp:=random(getmaxx+1); <br /> yp:=random(getmaxy+1); <br /> xk:=random(getmaxx+1); <br /> yk:=random(getmaxy+1); <br /> l:=sqrt((xp-xk)*(xp-xk)+(yp-yk)*(yp-yk)); <br /> suma:=suma+l; <br /> if l>300 then <br /> Line(xp,yp,xk,yk); <br /> if l>max then <br /> max:=l; <br /> if l<min then <br /> min:=l; <br /> end; <br /> Repeat until KeyPressed; <br /> CloseGraph; <br /> readln; <br /> writeln('najdluzszy odcinek wynosi ',max:6:1); <br /> writeln('najkrotszy odcinek wynosi ',min:6:1); <br /> srednia:=suma/n; <br /> writeln('sredniadlugosc odcinka wynosi ',srednia:6:1); <br /> readln ; <br /> <br />end.</td> </tr> </table> </td> </tr> <tr> <td colspan="2" height="1" class="spacerow"><img src="http://picsrv.fora.pl/fiblack/images/spacer.gif" alt="" width="1" height="1" /></td> </tr> </table>
Forum TIBIA forum Strona Główna
»
O wszystkim i o niczym
» Napisz odpowiedź
Skocz do:
Wybierz forum
Tibia
----------------
Bronie
Questy
Sklepy i handel
Postacie
Potwory
Problemy techniczne
Miasta
Magia
Cipsoft
Programy
OTS
----------------
Wszystko o OTS
Wasze OTS-y
Problemy
Wasze opinie i sugestie
----------------
Strona spoko gildia
Forum
Inne
----------------
Gry
O wszystkim i o niczym
fora.pl
- załóż własne forum dyskusyjne za darmo
Powered by
phpBB
© 2001/3 phpBB Group ::
FI Theme
:: Wszystkie czasy w strefie EET (Europa)
Regulamin
