mezi výstupy patří
i tisk dříve printer lst
co nyní ? dík
Zišlo by sa ešte uviesť, že keď pouziješ
read na čítanie zo súboru a hodnotu ukladáš do integer premennej tak prečíta
napr. Subor: 123, 1555, 1312
Code: read(subor, premennaa);
read(subor, premennab);
read(subor(premennac);
(premenne su všetky integer
tak
premenna:123
b:155
c:1312
Napr. ja som o tom nevedel až kým som to nenašiel v jednom zdrojovom kóde. A celkom sa to využije.
aha takto to je ja som myslel ze $ sa rata za ASCII znak a tym padom ho nemozno priradit premennej typu integer
Neviem, co presne myslis, ale tu je priklad na pouzitie:...
var cislo: integer;
...
cislo := $65;
writeln(chr(cislo));
...
este jedna otazka ku chr($x). ak dam namiesto cisla len premennu integer s nazvom int(chr($int)) tak to nefunguje. Skusal som $ dat do apostrofov a medzi '$' a int dat ciarku, ale nic nepomaha.
Ciselna hodnotu znaku sa ziska funkciou:
Ord(znak)
Na vratenie retazca obsahujuceho hexadecimalnu reprezentaciu cisla sluzi funkcia z jednotky SysUtils:IntToHex(cislo, pocet_znakov);
fajn, presne to som potreboval. A pocitam ze to funguje aj opacne, teda z ASCII do hexu, ako?
Ano, jednoducho.
Znak z decimalnej (desiatkovej) hodnoty: #cislo
Z hexadecimalnej hodnoty: chr($cislo)
Napriklad, #65 alebo chr($41) je 'A'.
da sa spravit nieco take ako ze napisem napr.:
write([nejaky specialny znak napr.#]61);
a program na obrazovku vypise [a]?
Ze napisem cislo v hexe a on mi vypise ASCII znak?
tiez som hladal nico o programovani a natrfail som na toto je to vynikajuce thanks