pomozcie napisac program

pomozcie napisac program
M8
  • Rejestracja:około 21 lat
  • Ostatnio:około 21 lat
0

Musze napisac taki program:
W plikach tekstowych o nazwach liczby1.txt oraz liczby2.txt zapisana jest pewna ilosc liczb naturalnych. Każda liczba zapisana jest w oddzielnej linijce. Twoim zadaniem jest utworzenie pliku tekstowego o nazwie wynik.txt, zawierajacego odpowiedzi na ponizsze pytania.
A) Ile razy wystepuje w pliku liczby1.txt cyfra 8 ?
B) Podaj zbior wszystkich liczb wystepujacych jednoczesnie w plikach liczby1.txt oraz liczby2.txt.

Prosze o pomoc np jakies podpowieszi lub zrodlo
z gory dziekuje

[glowa]text/array/real/integer/begin/assign/while/eof/readln/writeln/close/end.+24h nauki od zera [mf]

WA
  • Rejestracja:ponad 21 lat
  • Ostatnio:ponad 12 lat
  • Postów:501
0
  1. Ladujesz plik do StringList or od razu na pliku jedziesz petle po wszystkich liniach, (StrToInt, If) + F1
  2. Ladujesz wszystkie liczby z pierwszego pliku do tablicy, z drugiego lecisz i sprawdzasz po koolei petla, czy liczby nie ma w tablicy z liczbami pierwszgo pliku....
    Podstawy :-[ :-8 [glowa]
Dryobates
  • Rejestracja:prawie 23 lata
  • Ostatnio:około 6 lat
0

Czuje, ze to jednak Pascal, a nie Delphi.
Co do pierwszego. Najbardziej naiwne i malo ekonomiczne rozwiazanie:
Assign(F...
Reset(F)
while not Eof(F) do
begin
Read(F, znak);
if znak = '8' then osemek := osemek+1;
end;
Close(F);

Co do drugiego to przydaloby sie wiedziec jaka jest struktura pliku. W jaki sposob mamy odroznic liczby i czy jest to jakis skonczony zakres liczb (nie kazda liczbe da sie odczytac przez Read). Dopiero wtedy mozna wybrac najprostsza i najbardziej efektywna metode (szacowana ilosc liczb w pliku bylaby takze pomocna).


Jest jeszcze jeden błąd :)
Unix is user friendly. It's just very particular about who it's friends are.

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.