Sojusz Fallen
Fallen
FAQ
Szukaj
Użytkownicy
Grupy
Galerie
Rejestracja
Profil
Zaloguj się, by sprawdzić wiadomości
Zaloguj
Forum Sojusz Fallen Strona Główna
->
Informatyka Zaawansowana
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 CET (Europa)
Skocz do:
Wybierz forum
Klasowe - Technikum nr 7 Zabrze
----------------
Ściągi, Zadania itp.
Piastowie
Matura 04.05.2012 - 22.05.2012 - W trakcie...
Konkursy
III Rzeczpospolita
Matura - Lektury
OGame Wewnętrzne
----------------
Handel
Wojny i Pakty
Farmy i Skany
Nasze Najlepsze RW
Zmiany i Rozmowy o OGame
Statystyki
Metal za kryształ
Kryształ za deuter
Deuter za kryształ
Metal za deuter
Deuter za metal
Informatyka Zaawansowana
OB
SOiSK
Specjalizacja
PSiO
UTK
Angol
Ang.Zaw.
Fiza
Gegra
Hista
Mata
Niemiec
Polski
PP
Religia
WOS
Biola
Chemia
Władcy
Lektury
Olimpiada o Wynalazczości
TP
C
C++
PHP
Walka o Niepodległość
Java
Hyde Park
----------------
Zegar
Gadka Szmatka
Dowcipy
Gry Komputerowe
Porozmawiajmy o OGame
Sport
Filmy i TV
Nowinki Komputerowe i Komorkowe
Muza
Inne Unia
----------------
Nasza Gra na Innych Uniach
Archiwum
----------------
U60 i Akademia Fallen
U38
Chwała Fallen
U1
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>Ricko</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: Wto 20:21, 23 Lis 2010<span class="gen"> </span> Temat postu: Konwersje Liczbowe - Pascal</span></td> </tr> <tr> <td colspan="2"><hr /></td> </tr> <tr> <td colspan="2"><span class="postbody"><span style="font-weight: bold"><span style="font-size: 18px; line-height: normal">Z 10 NA 2</span></span> <br /> <br /></span> <table width="90%" cellspacing="1" cellpadding="3" border="0" align="center"> <tr> <td><span class="genmed"><b>Cytat:</b></span></td> </tr> <tr> <td class="quote">program z10na2; <br /> <br />uses crt; <br /> <br />var <br />a,i,j:integer; <br />t:array[1..20]of integer; <br /> <br />begin <br />clrscr; <br /> <br />writeln('Podaj a'); <br />readln(a); <br />i:=1; <br /> <br />if a<>0 then <br /> while a<>0 do <br /> begin <br /> if a mod 2=0 then <br /> t[i]:=0 <br /> else <br /> t[i]:=1; <br /> <br /> a:=a div 2; <br /> i:=i+1; <br /> end; <br /> <br /> for j:=i-1 downto 1 do <br /> write(t[j]); <br /> <br />readln; <br />readln; <br />end. <br /></td> </tr> </table> <span class="postbody"> <br /> <br /><span style="font-weight: bold">Działanie:</span> <br />Podana liczba: <br /></span> <table width="90%" cellspacing="1" cellpadding="3" border="0" align="center"> <tr> <td><span class="genmed"><b>Cytat:</b></span></td> </tr> <tr> <td class="quote">21</td> </tr> </table> <span class="postbody"> <br />Wynik: <br /></span> <table width="90%" cellspacing="1" cellpadding="3" border="0" align="center"> <tr> <td><span class="genmed"><b>Cytat:</b></span></td> </tr> <tr> <td class="quote">10101</td> </tr> </table> <span class="postbody"> <br />_____________________________________________________________ <br /> <br /><span style="font-weight: bold"><span style="font-size: 18px; line-height: normal">Z 2 NA 10</span></span> <br /> <br /></span> <table width="90%" cellspacing="1" cellpadding="3" border="0" align="center"> <tr> <td><span class="genmed"><b>Cytat:</b></span></td> </tr> <tr> <td class="quote">program z2na10; <br /> <br />uses crt; <br /> <br />var <br />a:string; <br />i,w:integer; <br /> <br />begin <br />clrscr; <br />writeln('Podaj liczbe binarna'); <br />readln(a); <br />w:=0; <br /> <br />for i:=1 to length(a) do <br /> if a[i]='1' then <br /> w:=w*2+1 <br /> else <br /> w:=w*2; <br /> <br />writeln(w); <br />readln; <br />end. <br /></td> </tr> </table> <span class="postbody"> <br /> <br /><span style="font-weight: bold">Działanie:</span> <br />Podana liczba: <br /></span> <table width="90%" cellspacing="1" cellpadding="3" border="0" align="center"> <tr> <td><span class="genmed"><b>Cytat:</b></span></td> </tr> <tr> <td class="quote">1010</td> </tr> </table> <span class="postbody"> <br />Wynik: <br /></span> <table width="90%" cellspacing="1" cellpadding="3" border="0" align="center"> <tr> <td><span class="genmed"><b>Cytat:</b></span></td> </tr> <tr> <td class="quote">10</td> </tr> </table> <span class="postbody"></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