Lze narýsovat trojúhelník?

Ostatní jazyky Visual Basic .NET Základní konstrukce Lze narýsovat trojúhelník?

Jelikož jsem tu jeden z mála co umí programovat v jazyce VB.NET, tak jsem se rozhodl pro zdejší komunitu připravit velmi jednoduchou ukázku. Tentokrát si to uděláme trochu zajímavější.

Nejprve vám řeknu, jak zjistit, zda trojúhelník lze narýsovat a jak spočítat jeho obvod i obsah. Pak se pokusíte sami vytvořit jednoduchou aplikaci, která to zpracuje automaticky. Jako ověření, že funguje správně, je níže textové pole a jednoduchá úloha, která vaši aplikaci otestuje. Teprve jakmile bude aplikace otestována, Vám dovolím přečíst si, jak jsem tuto aplikaci řešil já. Doufám, že se Vám to bude líbit. :)

Lze trojúhelník narýsovat?

Trojúhelník lze narýsovat, pokud platí, že

strana A + strana B > strana C

a

strana B + strana C > strana A

a

strana C + strana A > strana B

Pokud platí všechna tyto pravidla, trojúhelník lze narýsovat.

Obvod

Obvod spočítáme jednoduše a to tak že sečteme všechny strany.

o = A + B + C

Obsah

Obsah už je trochu těžší, na papír by jste to asi zvládli, ale v algoritmu je to těžší. existuje však tzv. Heronův vzorec.

Ten je následující a při programování vyjděte zněj:

Heronův vzorec

jinak s =

Takže teď přijde ta zábavná část :) Naprogramujte si aplikaci, která zjistí, zda lze trojúhelník narýsovat. Pokud ano, tak ať aplikace zjistí obvod a obsah trojúhelníku. Ještě napovím, že na odmocniny slouží funkce Math.Sqrt(cislo).

Úkol

Vašim úkolem je zjistit obvod a obsah trojúhelníku, pro který platí: {A = 7; B = 5; C = 6}. Tyto data nechte zpracovat vaši aplikaci.

Níže napište výsledek, stačí na 2 desetinná místa, zbytek desetinných míst odtrhněte.


Galerie

Program byl vytvořen v roce 2013.

 

Stáhnout

Staženo 274x (60.57 kB)
Aplikace je včetně zdrojových kódů v jazyce VB

 

  Aktivity (1)

Program pro vás napsal Michal Žůrek (misaz)
Avatar
Autor se věnuje tvorbě aplikací pro počítače, mobilní telefony, mikroprocesory a tvorbě webových stránek a webových aplikací. Nejraději programuje ve Visual Basicu a TypeScript. Ovládá HTML, CSS, JavaScript, TypeScript, C# a Visual Basic.

Jak se ti líbí článek?
Celkem (1 hlasů) :
55555


 



 

 

Komentáře

Avatar
David Čápka
Tým ITnetwork
Avatar
David Čápka:

Dobrý nápad s tím interaktivním článkem :P

Odpovědět  +1 8.6.2013 13:49
Miluji svou práci a zdejší komunitu, baví mě se rozvíjet, děkuji každému členovi za to, že zde působí.
Avatar
Honza Bittner
Redaktor
Avatar
Honza Bittner:

Hele .. když víš všechny 3 strany tak stačí podmínka

(a + b) > c

c - přepona

Tím ti odpadnou 2 podmínky ... nebo se pletu ? :)

Odpovědět 8.6.2013 14:10
Ptejte se mě na cokoli na https://github.com/HoBi/ama a followujte mě na Twitteru https://twitter.com/tenhobi. :-)
Avatar
David Čápka
Tým ITnetwork
Avatar
Odpovídá na Honza Bittner
David Čápka:

Tohle musíš udělat ale pro všechny strany :P

Odpovědět  +2 8.6.2013 14:11
Miluji svou práci a zdejší komunitu, baví mě se rozvíjet, děkuji každému členovi za to, že zde působí.
Avatar
Honza Bittner
Redaktor
Avatar
Odpovídá na David Čápka
Honza Bittner:

Když jsou odvěsny větší než přepona tak bude přepona s jednou odvěsnou větší než druhá odvěsna ... možná že se mýlím ... avšak myslím že ne :)

Odpovědět 8.6.2013 14:17
Ptejte se mě na cokoli na https://github.com/HoBi/ama a followujte mě na Twitteru https://twitter.com/tenhobi. :-)
Avatar
David Čápka
Tým ITnetwork
Avatar
Odpovídá na Honza Bittner
David Čápka:

Přepona a odvěsny jsou jen u pravoúhlého trojúhelníku.

Odpovědět 8.6.2013 14:23
Miluji svou práci a zdejší komunitu, baví mě se rozvíjet, děkuji každému členovi za to, že zde působí.
Avatar
Honza Bittner
Redaktor
Avatar
Odpovídá na David Čápka
Honza Bittner:

No jóó :D ... Sakra, trapas :D

Editováno 8.6.2013 14:28
Odpovědět  +1 8.6.2013 14:27
Ptejte se mě na cokoli na https://github.com/HoBi/ama a followujte mě na Twitteru https://twitter.com/tenhobi. :-)
Avatar
David Čápka
Tým ITnetwork
Avatar
Odpovídá na Honza Bittner
David Čápka:

Můžeš to zkusit, já myslím, že ne :)

Odpovědět 8.6.2013 14:28
Miluji svou práci a zdejší komunitu, baví mě se rozvíjet, děkuji každému členovi za to, že zde působí.
Avatar
Odpovídá na Honza Bittner
Michal Žůrek (misaz):

v druhé, třetí, páté a sedmé třídě mě učili že aby šel trojúhelník narýsovat, musí být součet dvou stran větší než třetí a to musí platiti pro všechny tři starny, tedy podmínky musí být opravdu tři.

Nemusí být podmínkou, že C je největší ani nic jiného. Musíme počítat i s uživatelem tupcem.

Odpovědět 8.6.2013 16:30
Nesnáším {}, proto se jim vyhýbám.
Avatar
Odpovídá na David Čápka
Michal Žůrek (misaz):

mě to napadlo, aby si to lidé opravdu zkusili a ne si pouze stáhli kód a nic vic je na tom nezajima.

Odpovědět 8.6.2013 16:31
Nesnáším {}, proto se jim vyhýbám.
Avatar
dave_23
Člen
Avatar
dave_23:

hezký :) díky za námět pro krátký prográmek. Jen desetinná tečka místo čárky mě trošku potrápila :D už sem hledal chybu v programu.

 
Odpovědět  +1 1.2.2014 16:46
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 10 zpráv z 10.