Matematické Fórum
Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.
Nástěnka
❗22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
❗04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
❗23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.
Nejste přihlášen(a). Přihlásit
#1 17. 07. 2012 10:59
- LRJ1
- Příspěvky: 156
- Škola: TUL - FM - obor: EIŘS - 2.ročník
- Pozice: student - kombinované studium
- Reputace: 0
Delphi - nalezení čísel
Zdravím a prosím o pomoc s touto úlohou. Napište program, který zpracovává diskový textový soubor. Ten obsahuje "běžný" anglický text. Program zjistí, kolik je v textu obsaženo skupin bezprostředně po sobě jdoucích číslic. Mnohokrát děkuji.
Offline
#2 24. 07. 2012 10:17 — Editoval hradecek (24. 07. 2012 10:18)
Re: Delphi - nalezení čísel
Klasika pascal:
Code:
|||
var
subor : TextFile;
str : string;
|||
begin
AssignFile(subor, 'C:\moj_textovy_subor.txt');
ReSet(subor);
|||
while not(eof(subor)) do begin
ReadLn(subor, str);
end;
|||
Close(subor);
end;Môže byť takto. Odporúčam aj dačo "vygoogliť".
Netrápte sa nad svojimi problémami s matematikou, môžem vás uistiť, že tie moje sú ešte väčšie. ~~Albert Einstein~~
Jak spozná člověk, že není pitomec ? - Moudrý člověk to nepozná nikdy a blbci je to jedno. ~~Jak přicházejí básnici o iluze~~
Někteří lidi se nikdy nezmění. Anebo se rychle změní a pak se zase rychle změní nazpátek. ~~Homer Simpson~~
Offline