Śmieci, śmieci i śmieci
Nasze-śmieci.pl
FAQ
Szukaj
Użytkownicy
Grupy
Galerie
Rejestracja
Profil
Zaloguj się, by sprawdzić wiadomości
Zaloguj
Forum Śmieci, śmieci i śmieci Strona Główna
->
Główny kontener
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:
TAK
BBCode
:
TAK
Uśmieszki:
TAK
Wyłącz HTML w tym poście
Wyłącz BBCode w tym poście
Wyłącz Uśmieszki w tym poście
Kod potwierdzający: *
Wszystkie czasy w strefie EET (Europa)
Skocz do:
Wybierz forum
Gra
----------------
Główny kontener
Kosz
Kubeł
Przegląd tematu
<table border="0" cellpadding="3" cellspacing="1" width="100%" class="forumline"> <tr> <th class="thCornerL" width="22%" height="26">Autor</th> <th class="thCornerR">Wiadomość</th> </tr> <tr> <td width="22%" align="left" valign="top" class="row1"><span class="name"><a name=""></a><b>tempy huj</b></span></td> <td class="row1" height="28" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td width="100%"><img src="http://picsrv.fora.pl/subBlack/images/icon_minipost.gif" width="12" height="9" alt="Post" title="Post" border="0" /><span class="postdetails">Wysłany: Śro 15:51, 27 Sty 2010<span class="gen"> </span> Temat postu: retyerher</span></td> </tr> <tr> <td colspan="2"><hr /></td> </tr> <tr> <td colspan="2"><span class="postbody">uses crt; <br />var <br />marka:array[1..10] of string; <br />model:array[1..10] of string; <br />rok:array[1..10] of integer; <br />przebieg:array[1..10] of real; <br />cena:array[1..10] of real; <br />i,x,y,z:byte; <br />label tab, n, kon,p; <br />procedure tabelka; <br /> <br />begin <br />clrscr; <br />write ('Lp Marka Model Rok Przebieg Cena'); <br />for i:=1 to 10 do <br />begin <br />x:=i+2; <br />gotoxy (1,x); <br />write (i); <br />gotoxy (9,x); <br />write (marka[i]); <br />gotoxy(17,x); <br />write (model[i]); <br />gotoxy(25,x); <br />write(rok[i]); <br />gotoxy(33,x); <br />write (przebieg[i]:10:0); <br />gotoxy(49,x); <br />write(cena[i]:10:0); <br />end; <br />end; <br />procedure wyp; <br /> <br />begin <br />write ('Podaj numer pozycji: '); <br /> <br />readln (y); <br />write( 'Podaj markie: '); <br />readln(marka[y]); <br />tabelka; <br />write( 'Podaj model: '); <br />readln(model[y]); <br />tabelka; <br />write ('Podaj rok: '); <br /> <br />readln (rok[y]); <br />tabelka; <br />write ('Podaj przebieg: '); <br />readln(przebieg[y]); <br />tabelka; <br />write ('Podaj cene: '); <br />readln (cena[y]); <br />tabelka; <br />end; <br /> <br />begin <br />p: <br />clrscr; <br />tabelka; <br />writeln; <br />Writeln ('[1] nowa pozycja [2] podglĄd tabelki [3] koniec '); <br />readln (z); <br />case z of <br />1: goto n; <br />2: goto tab; <br />3: goto kon; <br />end; <br />n: <br />wyp; <br />tab: <br />tabelka; <br />readln; <br />goto p; <br />kon: <br />end.</span></td> </tr> </table></td> </tr> <tr> <td colspan="2" height="1" class="spaceRow"><img src="http://picsrv.fora.pl/subBlack/images/spacer.gif" alt="" width="1" height="1" /></td> </tr> </table>
fora.pl
- załóż własne forum dyskusyjne za darmo
Powered by
phpBB
© 2001, 2002 phpBB Group
Regulamin
FAQ
Szukaj
Użytkownicy
Grupy
Galerie
Rejestracja
Zaloguj się, by sprawdzić wiadomości
Zaloguj