Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.
Nástěnka
❗22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
❗04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
❗23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.
Nejste přihlášen(a). Přihlásit
ahoj, nevíte jak napsat v pascalu programek, jestliže mam zadanou posloupnost kladnych cisel ukoncenych nulou a mam zjistit delku nejdelsiho souvisleho useku. napřiklad mam čísla 1 4 5 5 6 a vysledek je tudíž 2. jde to řešit nějak jinak než pomocí pole?
Offline

pole nepotrebujes. Nekde bokem si udrzujes dlzku maximalniho useku, ktery si zatim nasel. Postupne beres ze vstupu cisla, pocitas kolik jich vidis stejnych za sebou a kdyz uvidis, ze se usek konci, teda, ze se cislo lisi od toho predchazajiciho, tak usek ukoncis a porovnas s maximalnim a tak. Kdyz tak, napis sem zdrojak co zatim mas.
Offline