Article View: alt.pl.mag.at
Article #36265Re: Pomóżcie - proste zadania z Pascala!!!
From: faziulek
Date: Sun, 12 Jun 2005 12:06
Date: Sun, 12 Jun 2005 12:06
42 lines
1883 bytes
1883 bytes
Użytkownik "Karol 'carool' Dzierżyc" <adres@domena.pl> napisał w wiadomości
news:d84phc$jk1$1@inews.gazeta.pl...
>
>> A znasz takiego programistę Otul'a???
>> Może on by ci pomógł :)
>> Adres mailowy na priv.
>
> Można jaśniej, bo mnie głowa boli i nie jestem w stanie myśleć.
>
>> BTW uważaj na tego hakiera co naciąga na kasę w Kielcach przez GG ;)
>
> Hehe, mówisz o tym szantażyście?
>
>
oto i te zadanko:
Powinno ci wystarczyc, a rozwinac ten przyklad jest banalnie latwo:
program z2na10;
uses crt;
var a,b:integer;
begin
clrscr;
writeln ('Podaj cyfry zapisu dwojkowego, zakoncz wpisaniem innej cyfry niz 0
lub 1');
readln(a);
b:=0;
while ((a=0) or (a=1)) do
begin
b:=b*2+a;
readln(a);
end;
writeln('Ta liczba to ', b);
readln;
end.
i jak?
Piwnko sie nalezy:) heh
Pozdro
faziulek
Technical Details
Message-ID:
<d8h9pu$kir$1@nemesis.news.tpi.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!newsfeed.tpinternet.pl!nemesis.news.tpi.pl!news.tpi.pl!not-for-mailReferences:
<d827cq$t8r$1@inews.gazeta.pl> <d83lma$39u$1@news.onet.pl> <d84phc$jk1$1@inews.gazeta.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!newsfeed.tpinternet.pl!nemesis.news.tpi.pl!news.tpi.pl!not-for-mail From: "faziulek" <faziulek@o2.pl> Newsgroups: alt.pl.mag.at Subject: Re: Pomóżcie - proste zadania z Pascala!!! Date: Sun, 12 Jun 2005 14:06:21 +0200 Organization: tp.internet - http://www.tpi.pl/ Lines: 44 Message-ID: <d8h9pu$kir$1@nemesis.news.tpi.pl> References: <d827cq$t8r$1@inews.gazeta.pl> <d83lma$39u$1@news.onet.pl> <d84phc$jk1$1@inews.gazeta.pl> NNTP-Posting-Host: pb19.torun.cvx.ppp.tpnet.pl X-Trace: nemesis.news.tpi.pl 1118579327 21083 213.76.55.19 (12 Jun 2005 12:28:47 GMT) X-Complaints-To: usenet@tpi.pl NNTP-Posting-Date: Sun, 12 Jun 2005 12:28:47 +0000 (UTC) X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2900.2180 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180 X-RFC2646: Format=Flowed; Original MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit