np. s:String;
begin
Writeln ('Podaj ciąg');
readln (s);
- tu jest 6 slow, a 44 znaki
ale jak mam bardzo dlugi tekst to nie policze na oko ;p
Baaardzo prosze o syzbką odpowiedź
:)
Aktualizacje na programosy.pl:
TARGET 3001! • Chromium • Kaspersky Rescue Disk • Vim • Mozilla Thunderbird • ScreenToGif • SRWare Iron Portable • SRWare Iron • The Bat! Pro
-
- Ogłoszenie:
liczenie znakow
3 posty(ów) • Strona 1 z 1
liczenie znakow
przez Bialko0019 26 Lut 2008, 23:26
Witam. Potzrbuje sposou a raczej programu do obliczenia ilosci znakow w Pascal/Algo . Np. mam ciag znakow w Pascal/Algo i chce zobaczyc ile jest tam znakow.
np. s:String;
begin
Writeln ('Podaj ciąg');
readln (s);
- tu jest 6 slow, a 44 znaki
ale jak mam bardzo dlugi tekst to nie policze na oko ;p
Baaardzo prosze o syzbką odpowiedź:)
np. s:String;
begin
Writeln ('Podaj ciąg');
readln (s);
- tu jest 6 slow, a 44 znaki
ale jak mam bardzo dlugi tekst to nie policze na oko ;p
Baaardzo prosze o syzbką odpowiedź
:)Piszę bo chce pomóc, jeżeli się pomylę - popraw mnie 
===========
Poszukuję osoby do wymienienia się bannerem, linkiem, boksem czy buttonem. ! REKLAMA ZA DARMO ! PISZ NA PW !
===========
Poszukuję osoby do wymienienia się bannerem, linkiem, boksem czy buttonem. ! REKLAMA ZA DARMO ! PISZ NA PW !
-
Bialko0019 - Posty: 739
- Dołączenie: 10 Lut 2007, 22:47
- Miejscowość: Radom
- Pochwały: 36
przez Lukesh 26 Lut 2008, 23:36
- Kod: Zaznacz wszystko
uses crt;
var plik: text;
var znaki: integer;
var linijka: string;
begin
clrscr;
assign(plik, 'plik.txt');
reset(plik);
znaki:=0;
repeat
readln(plik, linijka);
znaki:=znaki+length(linijka);
until eof(plik);
write(znaki);
readln;
end.
plik.txt musi być w tym samym katalogu co program, ewentualnie zamieniasz na C:\xxx\plik.txt itp.
][_, ([]) ][_, xD
Niedaleko od Krakowa leży miasto Częstochowa,
dzieją się tam różne rzeczy, zakonnice mają dzieci
I kup sobie chamie medalik na szyje,
nic Ci się nie stanie i tramwaj nie zabije,
I kup sobie chamie obrączkę na rączkę,
nie będziesz chorował na kiłe i rzeżączkę.
Medalikarz mądra głowa, niech nam żyje Częstochowa,
czy za dyche, czy za piątkę kupisz chamie tu pamiątkę,
a pamiątka z Częstochowy to karabin maszynowy !
Niedaleko od Krakowa leży miasto Częstochowa,
dzieją się tam różne rzeczy, zakonnice mają dzieci
I kup sobie chamie medalik na szyje,
nic Ci się nie stanie i tramwaj nie zabije,
I kup sobie chamie obrączkę na rączkę,
nie będziesz chorował na kiłe i rzeżączkę.
Medalikarz mądra głowa, niech nam żyje Częstochowa,
czy za dyche, czy za piątkę kupisz chamie tu pamiątkę,
a pamiątka z Częstochowy to karabin maszynowy !
-
Lukesh - *mod
- Posty: 7838
- Dołączenie: 11 Lis 2005, 21:45
- Miejscowość: Częstochowa / Kraków
- Pochwały: 852
przez Bialko0019 26 Lut 2008, 23:39
ale skad i jakim programem to zrobie ?
Piszę bo chce pomóc, jeżeli się pomylę - popraw mnie
===========
Poszukuję osoby do wymienienia się bannerem, linkiem, boksem czy buttonem. ! REKLAMA ZA DARMO ! PISZ NA PW !
===========
Poszukuję osoby do wymienienia się bannerem, linkiem, boksem czy buttonem. ! REKLAMA ZA DARMO ! PISZ NA PW !
-
Bialko0019 - Posty: 739
- Dołączenie: 10 Lut 2007, 22:47
- Miejscowość: Radom
- Pochwały: 36
-
3 posty(ów) • Strona 1 z 1
Kto jest na forum
Użytkownicy przeglądający to forum: Brak zarejestrowanych użytkowników oraz 24 gości