POLE

Caute neviete mi niekto poradit ako mam spravit v pascale program ktory vypise pocet pismen podla toho ake slovo si uzivatel zada? Napr. BLBEC a program vypise 2xB,1xL,1xE,1xC. Dakujem za snahu mne to nejde uplne podla mojich predstav a chcel by som vediet kde robim chybu.
BTW: malo by sa to robit cez pole a:array (a..z) of integer

srry ze ti do toho skacem ale asi 3 prikazy sme sa neucili nedalo by sa to niako lahsie polopatisitcky... ale dakujem za snahu

hehe, ja som to stiahol z netu preto tam anglicke premeny..lahsie ti to neviem spravit, ale neviem na co, sak je to cele lahke na pochopenie a tie 3 prikazy mas v helpe pascalu tak povies profakovi ze si si to tam pozrel..alebo sem daj program co si spravil zatial ty a skusime ten vylepsit aby fungovali, pisal si ze nejde podla tvojich predstav uz len :o)

takze neviem tu premennu countartype...co to je a neda sa to bez toho?

ale asi takto niako som to ja vymyslel ale asi zle:

program slovo
uses crt;
var a:array [´a´..´z´] of integer;
i:integer;
pismena,pismeno:char;
slovo:string;
begin
writeln (´Zadaj svoje slovo.´);
readln (slovo);
for i := 1 to lenght(slovo) do
begin
if pismeno in [´a´..´z´] then writeln (´Mas tam zatial 1x toto´,pismeno);
if pismeno in [´a´..´z´] then pismeno := pismena;
end;
writeln (´Mas tam ´,pismena);
readln;
end.

takto vam to funguje??
neskusal som to compilovat, ale mi neako nejde do hlavy ze pole je z pismen (char) a deklarujete ho ako pole celych cisel (integer)..
funguje to bez problemov??

to s tym pole je myslene ako oznacenia, pod jednotlivymi polozkami sa budu nachadzat cisla..takze a[b] napriklad ma hodnotu 0 a tak..a..z su iba oznacenia tych prvkov tam, ale hodnoty budu ciselne, preto integer..ak si myslel toto..

inac miso_t, v tom programe mi unika pointa co chces robit v tom for, sak "pismeno" nema ziadnu hodnotu, resp ziadnu si do tej premenej neprideloval tak cely ten cyklus sa rovno ignoruje
Takze vo for pod begin napis

, nasledujuce 2 riadky uz nemaju vobec vyznam ten prvy ti vypise "pismeno" , nasledujuci riadok...do pismeno pridelis nic ? musis pocet tych pismen zapisovat do poli, to sa deje v tom mojom kde tu



a potom vypisovat polia kde je hodnota vyssia ako 0 ..

Definiciu toho countarrtype som nevedel najst na nete :o) ale jeho vyznam je ze normalne ked nacitas do pismena aktualne pismeno, cize napriklad 'b' tak potom potrebujes nejako zapisat do a['b']:=a['b']+1 ; ..a tento riadok musi byt premenlivi co nemas ako spravit..ak das a['pismeno'] tak ti to nepojde..ak das a[pismeno] tiez nie..ale ked pouzijes countarrtype tak mozes pouzit a[pismeno] , to je cele vyuzitie toho tam..proste sa tam dopisu ' ' vsade

takte aok bude cely program vyzerat??

a co takto keby to bolo? urvite tam niaka chba je ale aka?

skús toto. Momentálne nemám nahodený pascal, len delphi tak mi chýba crt. To si tam pridaj a teda ani neviem či je správny výstup lebo mi to hneď vyhodí.. no to je jedno..


možno je to neprehladné kôli tým poznámkam, ale aby si pochopil ako som zmýšlal. Vravím že nezaručujem že bude fungovať, ale môže ti to byť aspoň inšipráciou. A k tvojmu programu: máš tam aj plno preklepov, napríklad nevieš napísať uses, length, namiesto apostrofov si dával dlžne alebo čo to bolo...