Pytanie o ASCII i char ....

Article View: pl.comp.lang.pascal

Article #80379

Back to pl.comp.lang.pascal Previous Next

#80379

From: Rafał
Date: Tue, 21 Oct 2003 19:04

30 lines
1510 bytes

Witam.
Mam problem z programem tego typu :

Var
  znak : Char;
Begin
  Write('Wpisz dowolny znak : ');
  ReadLn(znak);
  WriteLn('Wpisales znak [', znak, '] o kodzie ASCII ', Ord(znak));
  ReadLn;
End.


A mianowicie - pokazuje sie tylko kod 1 znaku.
Moje pytanie brzmi :
Co nalezy zrobic aby program pokazywal ascii kazdego znaku w wyrazie,
np.
wpisuje wyraz : rafal
program pokazuje mi ascii kazdego znaku po kolei z spacja pomiedzy.
np.

Wpisz wyraz : rafal
Wyraz w kodzie ascii to : 72 61 66 61 108

Co musze zrobić ?
Jakas tablica ?
Petla ?

Z góry serdecznie dziękuję za pomoc.
Pozdrawiam

Technical Details

Message-ID: <bn403u$o0f$1@nemesis.news.tpi.pl>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!news.ipartners.pl!news2.icm.edu.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!news.ipartners.pl!news2.icm.edu.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail
From: Rafał <rafal@wp.pl>
Newsgroups: pl.comp.lang.pascal
Subject: Pytanie o ASCII i char ....
Date: Tue, 21 Oct 2003 21:04:54 +0200
Organization: tp.internet - http://www.tpi.pl/
Lines: 32
Message-ID: <bn403u$o0f$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: sp74.internetdsl.tpnet.pl
X-Trace: nemesis.news.tpi.pl 1066763200 24591 80.55.93.74 (21 Oct 2003 19:06:40 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Tue, 21 Oct 2003 19:06:40 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2720.3000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2727.1300
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit