pascal - kalkulačka
HackForum
|
| hoď sem (open)source ;) (odpovědět) | Rift_ | 212.96.190.* | 24.9.2007 19:59 |
|
|
|
| jj to bude jistejsi
----------
*´¨)
¸.·´¸.·´¨)
(¸.·´ (¸.·*´`*·>>> [link] <<< (odpovědět) | |
|
|
|
| no, mohl bys tam dodělat víc možností, arit. prumer, sqrt, ^ atd :)
pár příkladů (mimo sqrt):
[link]
(odpovědět) | Rift_ | 212.96.190.* | 24.9.2007 22:08 |
|
|
|
| dik, neco sem tam dodal ale eště potřebuju nák ošefovat vstupy... nevite nekdo jak to udělat aby když je jako vstup promena typu real (comp, integer...) tak jakej za to dát příkaz aby když uživatel zadá nejaký nečíselný znak aby to vyhodilo nákou hlášku která se zadá? prostě aby to bylo "blbuvzdorný" a nehroutilo se to když bude špatnej vstup... na google sem hledal ale nic kloudnýho sem nenašel... (odpovědět) | :) | 62.245.78.* | 26.9.2007 16:43 |
|
|
|
| možná by šlo použít:
...
{$I-}
readln(a);
{$I+}
if ioresult=0 then writeln('povedlo')
else writeln('nepovedlo');
... (odpovědět) | Rift_ | 212.96.190.* | 26.9.2007 17:09 |
|
|
|
| HM... podle toho chápu že by to zabrat mělo ale když to hodim do kompileru (i když udělam novej jednoduchej program abych to otestoval) tak mi to prostě nefunguje... respektive funguje funguje to do toho ELSE... když to celý else zakomentuju tak to běži v poho akortat když zadam ten špatnej vstup (nečíselný znak) tak nevidim jestli to funguje tak jak má protože tam neni to else... fakt nevim co se deje ale zkoušel sem napsat cokoliv kde je if <podminka> then <prikaz> else <prikaz2> a nefunuguje mi to... zase chyba u toho else... sem z toho fakt zmatenej :(((
(odpovědět) | :) | 62.245.78.* | 26.9.2007 20:11 |
|
|
|
| tak oprava: použil sem jiny kompiler (puvodi - free pascal) a tedka ten kod běha jak ma ;) diky moc.. (odpovědět) | :) | 62.245.78.* | 26.9.2007 21:21 |
|
|
|
| tak oprava: použil sem jiny kompiler (puvodi - free pascal) a tedka ten kod běha jak ma ;) diky moc.. (odpovědět) | :) | 62.245.78.* | 26.9.2007 21:21 |
|
|
|
| Nebylo by korektnější číst to jako string, pak si ho projet na nepovolené znaky, a v případě, že bude v pořádku, převést na číslo?
A off topic: A bylo by víc user friendly, než to dělat takovouhle "obrácenou reverzní polskou notací" (operace, operand 1, operand2, ...), poptat se rovnou na výraz a ten si vyhodnotit. (odpovědět) | gugumaa | 195.113.79.10/10.0.10.* | 27.9.2007 15:41 |
|
|
|
| gugumaa: ano neco jako tohle mě napadlo dřív než sem zakládal tenhle topic ale nevim jak bych to pak měl kontrolovat (ten obsah stringu). a pak mě taky napadá jestli se se stringem da vubec pracovat jako s číslem (scitat, odčitat,....) a myslim že neda ale nejsem si jistej... (odpovědět) | :) | 62.245.78.* | 27.9.2007 15:46 |
|
|
|