Lehce těžká bezradnost se seminární prací - sort a průměr – Pascal – Fórum – Programujte.com

Dobrý den, jak název napovídá, jsem v koncích se seminární prací. Samozřejmě nežádám, aby zde někdo dělal celý úkol za mě, ale potřebovala bych trošičku pošťouchnout správným směrem. Zadání:

"Uživatel zadá (do objektu Memo) několik (max. 20) celých čísel. Program je okopíruje do dalšího objektu Memo tak, že vymění maximální a minimální prvek. Dále spočítá aritmetický průměr čísel dělitelných 3. Ošetři proti špatnému = nečíselnému zadání."

Ztracená jsem v oblasti jak výměny nejvyššího a nejmenšího čísla tak průměru čísel dělitelných třemi. Jakákoliv pomoc by byla opravdu, opravdu vítána. Děkuji! :)

Memo je string nebo pole stringu, tusim.

Vytvoris si pole (array).
Cyklem budes cist z memo stringy, vybirat z toho cisla, napr "123" (string). Prevadet je na cisla 123 (integer) a ukladat do pole.
Pak uz si snadno cyklem zjistis, ktere cislo je max a min a ulozis si jejich pozice v poli. Prehodis je.
Cyklem prevedes pole do tvaru memo stringu.

 Spocitat prumer, kdyz je to pekne v poli, snad nebude takovy problem, ne?

<script>
// html/javascript
pole = [4,6,3,8,2,1];
alert(pole);
pos_min = 5;
pos_max = 3;
tmp = pole[pos_min];
pole[pos_min] = pole[pos_max];
pole[pos_max] = tmp;
alert(pole);
len = pole.lengthsum = 0;
for (i=0;i<len;i++) sum+=pole[i];
alert('prumer '+(sum/len))

</script>

Jestli se nemýlím, tak k jednotlivým řádkům v memu se leze přes vlastnost lines, která se chová jako pole:

MojeMemo[3]:='nejaky text';
DesatyRadek:=MojeMemo.lines[9]; {indexuje se od nuly}

Hledání minima a maxima v poli se dá najít např. u mě na stránce ve školní sekci.

Převod textu na číslo včetně kontroly správnosti umí příkaz Val.