Article View: pl.comp.lang.pascal
Article #80386Re: Pytanie o ASCII i char ....
From: egze000
Date: Wed, 22 Oct 2003 17:14
Date: Wed, 22 Oct 2003 17:14
22 lines
1357 bytes
1357 bytes
Rafał <rafal@wp.pl> napisał(a):
> Co nalezy zrobic aby program pokazywal ascii kazdego znaku w wyrazie
chodiz o to że char to zmienna 1-znakowa, oto moja wersja:
Var
znak : string;
i:byte;
Begin
Write('Wpisz dowolny znak : ');
ReadLn(znak);
WriteLn('Wpisales znak [', znak, '] o kodzie ASCII ');
for i:=1 to length(znak) do write(Ord(znak),' ');
ReadLn;
End.
----------
egze000
--
Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Technical Details
Message-ID:
<bn6duf$lh$1@inews.gazeta.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!newsfeed.gazeta.pl!news.gazeta.pl!www.gazeta.pl!not-for-mailReferences:
<bn4041$o0f$2@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!newsfeed.gazeta.pl!news.gazeta.pl!www.gazeta.pl!not-for-mail From: "egze000" <egze000@gazeta.SKASUJ.TO.pl> Newsgroups: pl.comp.lang.pascal Subject: Re: Pytanie o ASCII i char .... Date: Wed, 22 Oct 2003 17:14:55 +0000 (UTC) Organization: Portal Gazeta.pl -> http://www.gazeta.pl Lines: 22 Message-ID: <bn6duf$lh$1@inews.gazeta.pl> References: <bn4041$o0f$2@nemesis.news.tpi.pl> NNTP-Posting-Host: pa139.olsztyn.cvx.ppp.tpnet.pl X-Trace: inews.gazeta.pl 1066842895 689 172.20.26.238 (22 Oct 2003 17:14:55 GMT) X-Complaints-To: usenet@agora.pl NNTP-Posting-Date: Wed, 22 Oct 2003 17:14:55 +0000 (UTC) X-User: egze000 X-Remote-IP: pa139.olsztyn.cvx.ppp.tpnet.pl MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit