Ładny brzuch

Mam taki problem, ktory poczatkowo wydawal sie latwy, ale nie jest tak do konca. A mianowicie czy bedzie ktos tak mily i poda kod (w Pascalu), ktory po nacisnieciu Entera(readkey-choc niekoniecznie) przechodzilby do nastepnej lini.
Bo domyslnie jak sie da Enter to wychodzi z programu (pisze w Linuksie).
Z gory dziekuje za wszelka pomoc.
Pozdrowienia:)


program jakistam;
uses crt;
var zn:char;

begin
repeat
zn:=readkey; {wczytuje znak}
if ord(zn)=13 then writeln; {jezeli ENTER to przejdz do nowej linii}

{twoj kod}

until (ord(zn)=27); {powterzaj, a nie wcisnie sie ESC}
end.

Mam nadziej, e o to Ci chodzio :)

Pozdrawiam i zapraszam na *** www.windowsik.prv.pl ***

A nie prosciej:

program talala;
begin
{...}
readln;
{...}
end.

Kompilatory sa jak kobiety - raz chca, a raz nie ;-)

g-g: 2550505

Dokladnie o to chodzilo:D Wielkie dzieki Favex.
Pozdrowienia:)


Michalek a probowales to chociaz uruchomic? Przeciez to oczywiste ze ten kod, ktory podales nie zadziala w sposob, ktory oczekuje.
Pozdrowienia:)

cytat:Favex napisa:

[blue]...

byo by piknie, ale na linuxie zamiast crt, uyj ncrt. ;) reszty kodu nie sprawdziaem:) tak mi si tylko rzucio w oczy:P

Kodie

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •