🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: de.comp.lang.pascal
Article #32

Re: Wurzel-Zeichen

#32
From: Ing. Franz Glaser
Date: Mon, 07 Feb 2000 00:00
27 lines
2223 bytes
Frank Peelo wrote:
> 
> Malte <Malte@isjm.com> wrote in message news:389EDC24.28312532@isjm.com...
> > Liebe Pascal-Gemeinde,
> > ich wei� nicht, wie ich das Wurzelzeichen in Pascal schreiben kann (auf
> > der Tastatur ist es auch nicht vorhanden.)! K�nnt ihr mir helfen?
> > Bsp:
> > Wurzel von 36 = 6
> 
> According to Table D.1 in the Programmer's Reference of my Borland Pascal,
> it's #251. So:
> 
>   Writeln(#251,r:0:2,' = ',sqrt(r):0:2);
> 
> where r is a floating point or real type.
> That might depend on the code page, however.

Exactly this is the problem. In German MSDOS installations the
usual, "well" known M$ tricks take effect and the wrong charset
is installed.

From memory: C>chcp 437 should be helpful AFAIR.
-- 
Franz Glaser, Glasau 3, A-4191 Vorderweissenbach Austria +43-7219-7035-0
Muehlviertler Elektronik Glaser.  Industrial control and instrumentation
http://members.eunet.at/meg-glaser/    http://members.xoom.com/f_glaser/
http://www.geocities.com/~franzglaser/            http://start.at/bedarf
Technical Details
Message-ID: <389F04BE.87FFDD54@eunet.at>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <389EDC24.28312532@isjm.com> <87mt8t$kjg$1@kermit.esat.net>

Show Full Headers
Complete Article Headers
X-Google-Language: GERMAN,ASCII
X-Google-Thread: fd1d1,9353e34143c3f257
X-Google-Attributes: gidfd1d1,public
X-Google-Thread: 1043cf,d5656f67a891b636
X-Google-Attributes: gid1043cf,public
X-Google-Thread: 111659,d5656f67a891b636
X-Google-Attributes: gid111659,public
X-Google-Thread: 110930,d5656f67a891b636
X-Google-Attributes: gid110930,public
X-Google-Thread: 108ebd,d5656f67a891b636
X-Google-Attributes: gid108ebd,public
From: "Ing. Franz Glaser" <meg-glaser@eunet.at>
Subject: Re: Wurzel-Zeichen
Date: 2000/02/07
Message-ID: <389F04BE.87FFDD54@eunet.at>
X-Deja-AN: 582732108
Content-Transfer-Encoding: 8bit
References: <389EDC24.28312532@isjm.com> <87mt8t$kjg$1@kermit.esat.net>
X-Accept-Language: en
Content-Type: text/plain; charset=iso-8859-1
X-Complaints-To: abuse@Austria.EU.net
X-Trace: nreader3.kpnqwest.net 949945469 193.81.169.217 (Mon, 07 Feb 2000 18:44:29 MET)
Organization: http://members.eunet.at/meg-glaser/
MIME-Version: 1.0
NNTP-Posting-Date: Mon, 07 Feb 2000 18:44:29 MET
Newsgroups: de.comp.lang.pascal,borland.public.turbopascal,comp.lang.pascal.borland,z-netz.sprachen.pascal,borland.public.delphi.objectpascal