Programujeme v Lazaruse – 3. časť
V dnešnej časti si vytvoríme program, ktorý po zadaní strán trojuholníka zistí, či sa dá narysovať..
Čo budeme dnes robiť?
Minulú časť sme si vytvorili vlastnú jednoduchú kalkulačku. Ozrejmili sme si už konvertovanie, príkaz priradenia, deklaráciu premennej. V dnešnej časti seriálu prejdeme na vytvorenie programu, ktorý nám zistí, či sa dá narysovať daný trojuholník.
Najskôr si však musíme ozrejmiť trojuholníkovú nerovnosť. Určite je všetci poznáte. Trojuholník sa dá narysovať práve vtedy, ak súčet dvoch strán je väčší ako tá tretia. Nech trojuholník má strany a,b,c tak musí platiť:
a je menšie ako b+c
b je menšie ako a+c
c je menšie ako a+b
Ak tieto podmienky platia, trojuholník sa dá narysovať. Náš program bude pozostávať z troch editov, do ktorých zadáme čísla. Tie si uložíme do premenných a dosadíme ich do nerovnosti. Potom pomocou príkazu showmessage vypíšeme, či sa dá skonštruovať alebo nie.
Čo potrebujeme pred tým vedieť?
Dnes bude nový iba jediný príkaz a to podmienkový. Tvar má nasledovný:
If podmienka then vykonaj1 else vykonaj2; (Ak je splnená podmienka tak vykonaj1 ak nie vykonaj2);
If a=0 then showmessge(‚a sa rovná 0‘) else showmessage(‚a sa nerovná nude‘);
Tento príkaz nám zistí, či sa premenná a rovná 0 (podmienka) a ak a sa rovná nule, potom napíše: „a sa rovná nule“. Ak sa nerovná nule, napíše: „a sa nerovná nule“
Tento príkaz sa dá použiť aj v tvare:
if a<0 then vykonaj1; (Počítač spraví vykonaj1 práve vtedy, keď je splnená podmienka. Ak podmienka nie je splnená, nič sa nestane)
Vytvorenie programu:
1.Pustíme si Lazarus.
2.Klikneme na File – New - Application.
3.Zo záložky „Standard“ vyberieme položku panel a vložíme ju na formulár.
4.Do formulára vložíme taktiež zo záložky „Standard“ jeden BUTTON a tri EDITy.
5.Vo vlastnostiach buttonu zmeníme caption na "Dá sa trojuholník narysovať?" a text editu a caption panelu zmažeme.
6.Pre vylepšenie pridáme ešte zo záložky „Standard“ tri labely a premenujeme ho na „Zadaj stranu a“, „Zadaj stranu b“, „Zadaj stranu c“.
Grafickú stránku nášho programu máme hotovú. Môžeme sa pustiť do kódovania.
7.Klikneme dvakrát na button (Dá sa trojuholník narysovať?), pretože ideme programovať udalosť po kliknutí na button.
8.Prvé, čo potrebujeme, je načítanie strán a,b,c.
9.Zadeklarujeme si premenné, do ktorej sa nám uložia strany. Môžu byť buď typu integer (ak veľkosti strán sú v celých číslach) alebo real (ak veľkosti strán sú aj desatinné čísla)10.Nazvime ju meno. Premenné sa deklarujú do var a to nasledovne: var a,b,c:real; (Var si musíte ručne dopísať nad begin.)
11.Načítame veľkosti strán do premenných. Pod begin napíšeme:
a:= StrToFloat(edit1.text); (Do premennej a priraď skonvertované číslo z editu).
b:= StrToFloat(edit2.text);
c:= StrToFloat(edit3.text);
12.Každý príkaz, ktorý zadávate treba oddeliť bodkočiarkou.
13.Teraz čísla porovnáme podľa trojuholníkovej nerovnosti. Použijeme pri tom podmienkový príkaz:
If (a je menšie ako b+c) and (b je menšie ako a+c) and (c je menšie ako b+c) then showmessage('Trojuholnik sa da narysovat') else showmessage('Trojuholnik sa neda narysovat');
(Ak a je menšie ako b+c a súčastne b je menšie ako a+c a súčastne c je menšie ako a+b tak zobraz „Trojuholnik sa neda narysovať“ ak nie je splnené zobraz „Trojuholnik sa neda narysovat“)
14.Už to len uložíme a spustíme
File – Save as – Save
Kód by mal vyzerať nasledovne:
* znamienka nerovnosti sa nedali použiť. Namiesto nich sme použili slovné vyjadrenie. V programe používať ale znamienka.
Nabudúce si vytvoríme program, v ktorom sa naučíme použiť cyklus.
1 komentár k článku:
Komentovať môžu iba prihlásení
Zaregistruj sa cez bezplatnú registráciu alebo použi login cez Facebook (FB Connect)
Prihlás sa tu, ak už máš profil na Zajtra.sk:
Novinky
2 rokmi
Aprílové vtípky: Výběr toho nejlepšího kolem počítačů, internetu a techniky
Výběr nejlepších aprílových vtípků 2019
2 rokmi
Fotky Google sa učia lepšie pracovať s dokumentmi
Spoločnosť Google prostredníctvom svojho účtu na sociálnej sieti Twitter oficiálne predstavila novú funkciu svojej aplikácie Fotky Google.
2 rokmi
Gmail dovoľuje naplánovať poslanie emailu neskôr
Spoločnosť Google dnes oznámila pridanie funkčnej novinky do svojej populárnej webmailovej služby Gmail, možnosť naplánovať poslanie emailu na neskôr.
3 rokmi
Používatelia Chrome začali prechádzať na nový rýchlejší Firefox, avizujú dáta Mozilly
Nový lepší a rýchlejší prehliadač Firefox 57 Quantum vyúsťuje zrejme do viac používateľov prechádzajúcich respektíve vracajúcich sa na tento prehliadač z iných prehliadačov, na osobných počítačoch aj smartfónoch.
3 rokmi
Briti dokončili kúpu SK-NIC-u. Nové .sk domény nechávajú za 8.4 eur
Predaj správcu slovenskej domény .sk, SK-NIC, bol dokončený a novým majiteľom po telekomunikačnej skupine Danubiatel, do ktorej patrí napríklad Swan a 4ka, je britská spoločnosť CentralNic.
Staršie novinky »TOP dlhšie
- Aj ty môžeš byť najčítanejší. Napíš článok »
TOP tento mesiac
- Aj ty môžeš byť najčítanejší. Napíš článok »
Nové články:
- 14.Kingston uvádza 128GB verziu šifrovaného USB
sep - 10.Tiché COMBO Logitech MK295
sep - 24.Farbičky v HTML a CSS, alebo?
aug - 23.Pochopte, ako vytvoriť virtuálny obchod v 6 krokoch
aug - 29.Kamery, cloud a bezpečnosť
jul - Viac »
- Aj ty môžeš byť najčítanejší. Napíš článok »
Pekné veci
Pekné veci
Pekné veci
Pekné veci
Posledné komentáre
- Pokiaľ používaš nejaký lepší bitmapový editor, napr. Photoshop, a chceš robiť retuše, ed...
- Veľmi dobrý článok a pre začiatočníka úplne odrazový mostík. https://ludwaismania1.blogs...
- Nova international a prima lus majú vysporiadané pravs ale aj CNN prima News
- Tv Joj nijako neobmedzuje šírenie médii, ktoré majú vysporiadané licenčné práva pre Slov...
- Nech televizie vrátia naspäť originál verzie a tie internationali nech zrušia. Každý si ...
Kritika
Vieš ako robiť veci lepšie? Pomôž našim odvážnejším členom a skritizuj im projekty!
Reklama
Slovenská IT komunita
Seriály zo Zajtra.sk
· Ako písať blog
· Ako sa stať PHP ninja s Yii Frameworkom
· Aplikácie pre Facebook
· CSS triky
· iOS vývojára príhody a skúsenosti
· Jednoduché programy, ktoré vám ušetria čas
· Modelovanie webového sídla
· Nauč sa CodeIgniter [HD]
· Nauč sa jQuery [HD]
· Nette PHP framework
· OOP v Javascripte
· Programujeme v Jave
· Programujeme v Lazaruse
· Programujeme v Pythone
· Robíme Eshop v ASP.NET Web Pages
· Slovenskí iOS developeri
· Webdizajn krok po kroku
· Yablkov TurboTip [HD]
Nebolo by zle, keby si sem hadzal v neskorsich castiach aj zdrojaky. Rovnako hadzat do clanku casti zdrojakov cez <pre> tag.