x-kom hosting

Problem z napisaniem programu

ewela1987
utworzono
utworzono

mam problem z programem który ma zliczaczać znaki, słowa i wiersze w pliku tekstowym.

jeżeli ktoś umie to zrobić to bardzo prosze o pomoc!

marcinz17
komentarz
komentarz

oto program do oblicznaia liczby słów w pliku tekstowym:

program tekst;

const

tabulacja=9;

var

plik:text;

n: integer;

nazwa:string[12];

procedure slowa(nazwa: string; var liczba:integer);

var

znak:char;

noweslowo:boolean;

begin

assign(plik,nazwa);

reset(plik);

liczba:=0;

while not eof(plik) do

begin

read(plik,znak);

if znak=' ') or eoln(plik) or (ord(znak)=Tabulacja) then

noweslowo:=true

else

if noweslowo then

begin

liczba:=liczba+1;

noweslowo:=false;

end

end;

close(plik);

end;

begin

writeln('Podaj nazwę pliku');

readln(nazwa);

slowa(nazwa,n);

writeln('Liczba słów w pliku ',nazwa,' wynosi ',n:5);

end;

Evil
komentarz
komentarz
mam problem z programem który ma zliczaczać znaki, słowa i wiersze w pliku tekstowym.

jeżeli ktoś umie to zrobić to bardzo prosze o pomoc!

Może najpierw poinformujesz nas w jakim to ma być języku?? Wtedy można coś napisać

Wciąż szukasz rozwiązania problemu? Napisz teraz na forum!

Możesz zadać pytanie bez konieczności rejestracji - wystarczy, że wypełnisz formularz.

×
×
  • Dodaj nową pozycję...

Powiadomienie o plikach cookie

Strona wykorzystuje pliki cookies w celu prawidłowego świadczenia usług i wygody użytkowników. Warunki przechowywania i dostępu do plików cookies możesz zmienić w ustawieniach przeglądarki.