pascal kerdes

[Fuzesi Arnold]

Nem ez a gond.
Ennel sokkal nagyobb.
Ez egy progi amit vmi pascal nyelven értő interpreter akarna feldolgozni 
mint makrót.
az hogy az i értéke micsoda a legkisebb hiba a progiban

a pascal könyvem 1000km-re van tőlem kb, a net dadog, és én meg haladni 
akarnék
gondoltam aki pascalozik annak nemegész 30mp....a sallangokat (i ertekadas) 
azzal nincs gondom.
programozni tudok, csak a pascal szintaktika veszett a mult homályába 
sajna...


----- Original Message ----- 
From: "Sandor" <chiplista2007 at gmail.com>
To: <elektro at tesla.hu>
Sent: Monday, September 17, 2007 6:35 PM
Subject: Re: pascal kerdes


i kiindulási értéke? miért lenne 1 az értéke így?

Sándor
Fuzesi Arnold wrote:
> ezt vki ki tudna javítani nekem működőre?
> basszus elfelejtettem pascalul :(
>
> amit szeretnek:
> ami bejön karakter azt kiirom
> csak amikor hexa 0x4F jön, akkor egy soremelest beszurok a 0x4F utan
>
> 10000 kösz!
>
> var i: longint;
> var b: char;
> begin
>   writeln('start');
>
>     while i=1 do
>       b:=ComReadChr();
>       if (b=(0x4f)) then writeln('soremeles');
>      else wite(b);
>   end;
> end.
>
> -----------------------------------------
>           elektro[-flame|-etc]
>

-----------------------------------------
          elektro[-flame|-etc]