Kirjautuminen

Haku

Tehtävät

Keskustelu: Koodit näytille: rivien laskuri

Sivu 1 / 1

Osmo Happonen [16.06.2002 11:54:40]

#

Tämä ohjelma laskee pascalilla komento riviparametrillä annettusta tekstitiedostosta rivien määrän ja tulostaa sen. Vähän niin kuin linuxin wc -l

var a:longint;
    f:text;
begin
 assign(f,paramstr(1));
 reset(f);
 a:=0;
 while not eof(f) do begin
  readln(f);
  inc(a);
 end;
 close(f);
 writeln(a);
end.

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta