» Poradna » Programy

Existuje elegantnější algoritmus pro přiřazení?

 |   |  Microsoft Windows 10 Chrome 56.0.2924.87

Zdravím všechny,jak jsem se zde již zmínil, mou vášní jsou kalkulačky a z toho důvodu navštěvuji specializované fórum pro Casia. Objevují se tam zajímavé problémy, které tam pomáhám řešit- částečně je to matematika (např. jak umocňovat matice, jak získat sumu čtverců, riemmanův integrál), částečně programování v jazyce Casio Basic (např. počet s 3D vektory - vektorový součin, normálový vektor, objem, obsah rovnoběžnostěnu) a částečně obojí (např. jak umocnit každý prvek matice zvlášť). Naposledy se tam objevil problém, jak sečíst prvních n prvků ze seznamu.Program sám o sobě je jednoduchý. Jako vstup se používá předem vytvořený list1 a při spuštění programu se zadá n-tá pozicePokud chci začít sčítat jednotlivé prvky od začátku, tj. prvky na pozici 1, 2..n, používám následující přiřazenín-1→zn-z→z Nejprve si z hodnoty n spočítám předposlední hodnotu a posléze si z předposlední hodnoty spočítám 1 (a dále 2, 3..n)- např. n=6, pak si spočítám z=6-1 a pak z=6-5, čímž získám kýženou první pozici.Existuje nějaký elegantnější jednořádkový algoritmus než je tento?Celý program vypadá taktoClrTextInput n,"n-th term" ;zadání pozice0→x ;vynulování součtu a zároveň pomocná hodnotan-1→z ;získání pozice předposledního pvkun-z→z ; získání první pozice prvkudim(list1)→d ;získání počtu prvků v seznamu (dimension, rozměr)If n≤d ;porovnání zadaného n s počtem prvků, test na chybuThenWhile z≤nlist1[z]→y ;získání a zápis prvku na z-té pozici do yx+y→x ;procedura součtuz+1→z  Ukázat celý příspěvek

Odpovědi na otázku

 |   |  Linux Chrome 56.0.2924.87

Ne tendle je nejlepsi a nejrychlejsi.

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 10 Firefox 52.0

asi to tak bude

Souhlasím  |  Nesouhlasím  |  Odpovědět

Související témata: Matematika, Algoritmus, Získání, První pozice, Dimension, Matice, Jednotlivé prvky, Celý program, Kalkulačky, Vektor, Casio, Procedura, Term


Určitě si přečtěte

Deset kotev, které i v roce 2020 táhnou Android ke dnu

Deset kotev, které i v roce 2020 táhnou Android ke dnu

** Android existuje skoro 12 let a za tu dobu v mnoha směrech dospěl ** Dnes běží na sedmi z deseti telefonů, ale čemu za to vděčí? ** Našli jsme 10 kotev, které táhnou tento operační systém ke dnu

Karel Kilián | 165

12 netradičních map České republiky, které jste ještě nikdy neviděli

12 netradičních map České republiky, které jste ještě nikdy neviděli

** Tušíte, kolik je u nás hřbitovů a jak jsou velké? ** Dokážete si představit mapu českých řek a potoků? ** Udělali jsme to všechno za vás nad daty ČÚZK

Jakub Čížek | 10

Teachable Machine: Umělá inteligence za pět minut i bez doktorátu z ČVUT

Teachable Machine: Umělá inteligence za pět minut i bez doktorátu z ČVUT

** Pochopit techniky a principy A.I. je složité ** Ale nebojte, jde to i bez doktorátu z IT a matematiky ** Vyzkoušíme generátor neuronových sítí od Googlu

Jakub Čížek | 10

Čím nahradit Total Commander: 11 správců souborů nejen pro profíky

Čím nahradit Total Commander: 11 správců souborů nejen pro profíky

** Total Commander je fernomén mezi správci souborů ** Našli jsme 11 povedených alternativ ** Zvládnou to samé a ke všemu jsou většinou zadarmo

Karel Kilián | 86

Testy procesorů Intel Comet Lake pro desktopy jsou venku. Teď už je jasné, jakého dostaly Ryzeny soupeře

Testy procesorů Intel Comet Lake pro desktopy jsou venku. Teď už je jasné, jakého dostaly Ryzeny soupeře

** Embargo pro testy nových desktopových procesorů Comet Lake od Intelu skončilo ** Spousta recenzí a testů ukazuje výhody a nevýhody nových modelů ** Dokáží nové procesory konkurovat modelům od AMD?

Karel Javůrek | 47

Otestovali jsme nový Apple MacBook Air. S retinou a nižší cenou

Otestovali jsme nový Apple MacBook Air. S retinou a nižší cenou

** Test MacBooku Air v provedení pro rok 2020 ** Cenově dostupný notebook překvapí výkonem ** Výborné je celkové zpracování a klávesnice

Martin Miksa | 43


Aktuální číslo časopisu Computer

Megatest SSD s kapacitou 1 TB

Srovnávací test robotických vysavačů

Vybíráme nejlepší telefony na trhu

Jak zlepšit zvuk televize