Matematické Fórum

gemat · 26. 11. 2013 20:55

Prosím o radu, mám sestavit funkci, která mi vypíše, jaké prvky v poli nemají stejnou hodnotu jako index daného prvku (tzn. že když mám 1,3,2,4,5 tak by mi to mělo vypsat čísla 3 a 2) a vypsat jejich počet. Jsem momentálně trošku ztracen ve block([]....) a cyklu for.....:(

Díky moc!

mák · 26. 11. 2013 22:06

Zdravím,
Mám napsat funkci, -> s funkcí asi problém nemáš.

Cyklus for: zde musíš projet všechny položky pole od prvního členu po poslední.
Použiješ proměnou $index$ :

Code:

for index:1 thru length(Array) do ( ... tělo cyklu ... )

Funkce length vrací v tomto případě počet položek daného pole.
Do těla cyklu dáš podmínku, která bude porovnávat rovnost/nerovnost zkoušené položky pole s indexem:

Code:

if is(Array(index)=index) then ( ... )

Porovnání na nerovnost se píše takto:

Code:

if is(Array(index)#index) then ( ... )

No a pokud bude podmínka splněná budeš inkrementovat celkový čítač:

Code:

Pocet: Pocet + 1

a vypíšeš položku:

Code:

print(index)

No a na začátku si musíš proměnou $Pocet$ vynulovat, takto bude použita jako lokální:

Code:

block([Pocet:0], ... )

Jednotlivé příkazy uvnitř bloku jsou odděleny čárkou.
A na konci si opět příkazem print necháš vypsat $Pocet$ nalezených hodnot.

Teď už to dáš dohromady?

gemat · 27. 11. 2013 08:00 — Editoval gemat (27. 11. 2013 08:27)

↑ mák:↑ mák:↑ mák:

No, nejsem si jist, jestli se mi to podaří přetransformovat do maximy :) Kdbys byl tak laskavý, prosím, a poradil jak to tam dát - (zejm. si nejsem jist, jak napsat tu proměnnou index, jestli třeba x[1] nebo slovně index v maximě :)

AKTUALIZACE
- UŽ SE MI TO PODAŘILO, DÍKY MOC!!!!

Matematické Fórum

#1 26. 11. 2013 20:55

wxmaxima - prvky v poli

#2 26. 11. 2013 22:06

Re: wxmaxima - prvky v poli

Code:

Code:

Code:

Code:

Code:

Code:

#3 27. 11. 2013 08:00 — Editoval gemat (27. 11. 2013 08:27)

Re: wxmaxima - prvky v poli

Zápatí