----- Original Message -----
From: Alexandre Grouchine <GrushinA{([at]})nowhere.xy
To: <blackbox{([at]})nowhere.xy
Sent: Thursday, May 24, 2001 12:00 AM
Subject: Something Strange...
> When I try to use ENTIER - it works normally only if I put in a real
number by
> my own hands, for example: ENTIER(10.23). But when I write something like:
> .......
> VAR x:REAL; y:INTEGER;
> .......
> y:=ENTIER(x);
> .......
> it gives me a message about error: incompatible assignment.
> What is wrong?
The result of ENTIER is a LONGINT and not an INTEGER. You must write:
y:= SHORT(ENTIER(x));
>
> StdCoder.Decode ..,,
..HK....3Qw7uP5PRPPNR9Rbf9b8R79FTvMf1GomCrlAy2xhX,Cb2x
>
hXhC6FU1xhiZiVBhihgmRiioedhgrZcZRiXFfaqmSrtuGfa4700zdGrr8rmCLLCJuyKtYcZRiX
>
7.2.s,649.0k,5TWyql.bnayKmKKqGomC5XzET1.PuP.MHT9N9ntumaU2,CJuyKtQC98P9PP7O
> NbXmb.2.og2k2EjG.,6.cUGpmWLuOpoKqvCbHZiYpedhA704TeKKw.bHfEWUmL.6.F6,6.C
>
cIhgsNHT9N9ntQ8qorG4704D.CbB,708T1U.E78.T.Jc.2.,.h386.QC18RdfQHfMf9R9vQ7ON
>
b17.,.j,,6.o16.M.6.1eQHPMNH2PP,U.Yr0.vN.E.6r1w.GODCU0Cy2hgqRcjhhhBgiZgZJin
>
pZHZCh0E.4TWKKv.Uio8.,cw5.0..o.6.K,m.yzayIWKJaKIEqowGpmCLu8nRqk2aoa0pb8Je0
>
mtGLmenSCJuGKayqnin4aEf4Id0GweHdKoUmoR0mwenYuIeKoXKIdin4ak4aEc8pbCoWGoe8pW
>
0GWyKJWmIin4aEVKoXaIb0m4ak2CLuGKLCIqKqk8rRqk2aktkdGLtaKrSKISmw0mS0mHamRqk2
>
akwenSKIbGpYKIdWmM8HLCHO0nM4nIin4aUnV7pho3ZtBZvg,UAphvgV76SpNDXdARtAkRqk2A
>
D.2jdQbBktkd.2jUgbUw2.IeZBgg3ZsBZv.6H.sI.a5.U7,.6HkWuIW0GWyqRqkWuIWgdtZ8c9
>
Pc.POSdONEWyqRqE,5TeK45uPR9RZvPN9P9fQbf9bW1ZimZh2hgnRg.AyI,.ELCoruKu.GomCr
>
l0U1VV,.Z1...bf9.EWE.8T0E.E8E.k2E.0..4E,5TeEdKLqKKtCLLC3ZORNX2V.AyI,ktuGdK
>
LqKa2V.Iy1.,UfW5UXW.2.52.CLLC3b8Rn9P99F9vQ0ks,Uikwm46.Zz,,.,.60,UO,,U0mm.c
>
918R.Y62.7.,..Y22U,2.2.2YXK96.hvW3ELC71.1.,6.Ikmj,6..EBU.U,.JF2PP,U.2m,.,.
>
E4WDN.Ntarm3Wj.JklbcjlqK4Qcj,.E7U...F.,.aU.EUiptMa3J.nT32kwHUvJo2kQyG.vT1.
> ..
> --- end of encoding ---
Sorry, but your code has a checksum error.
Regards.
Gerard
>
> ----
> Бесплатная почтовая служба http://mail.Rambler.ru/
> Тетя Ася? Rambler Ego! http://www.rambler.ru/odigo/download.html
--------------------------------------------
To unsubscribe from this mailing list, send a message containing the word "unsubscribe" to:
blackbox-request{([at]})nowhere.xy
To get a list of valid e-mail commands and instructions on their usage, send a message containing the word "help" to the above address.
Send any problem reports or questions related to this email list to the list owner at
owner-blackbox{([at]})nowhere.xy
Received on Wed May 23 2001 - 22:48:06 UTC