Re: Pytanie o ASCII i char ....

Article View: pl.comp.lang.pascal

Article #80380

Back to pl.comp.lang.pascal Previous Next

#80380

From: Marek Przedwojski
Date: Tue, 21 Oct 2003 20:01

17 lines
1292 bytes

var
 s : string;
 i : integer;

begin
 Write('Wpisz wyraz:');
 Readln(s);
 Write('Wyraz w kodzie ascii to:');
 for i:=1 to Length(s) do Write(Ord(s[i]),' ');
 Write('Wcisnij Enter...');
 Readln;
end.

PS. nawiasem mówiąc to po wpisaniu rafal otrzymasz ciąg 114 97 102 97 108
a nie podany jak niżej:
>Wpisz wyraz : rafal
>Wyraz w kodzie ascii to : 72 61 66 61 108

Technical Details

Message-ID: <bn43ae$3uv$1@news.onet.pl>

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!not-for-mail

References: <bn403u$o0f$1@nemesis.news.tpi.pl>

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!not-for-mail
From: "Marek Przedwojski" <mprzed@nospam.poczta.onet.pl>
Newsgroups: pl.comp.lang.pascal
Subject: Re: Pytanie o ASCII i char ....
Date: Tue, 21 Oct 2003 22:01:18 +0200
Organization: news.onet.pl
Lines: 20
Sender: mprzed@poczta.onet.pl@sj214.internetdsl.tpnet.pl
Message-ID: <bn43ae$3uv$1@news.onet.pl>
References: <bn403u$o0f$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: sj214.internetdsl.tpnet.pl
X-Trace: news.onet.pl 1066766478 4063 80.55.87.214 (21 Oct 2003 20:01:18 GMT)
X-Complaints-To: abuse@onet.pl
NNTP-Posting-Date: 21 Oct 2003 20:01:18 GMT
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Reply to Parent Message