[ comeback @ 30.07.2013. 13:38 ] @
Imam problem oko ovog zadatka.Napisao sam code i nije mi jasno gde gresim.Mislim da mi funkcije prave problem,ali ne znam sta je problem.Evo teksta:
Napisati program na programskom jeziku Paskal koji među unetim brojevima pronalazi sve one
koji od aritmetičke sredine unetih brojeva (AS) odstupaju za više od jedne standardne devijacije (σ).
Brojevi se čitaju sve dok se ne unese vrednost -1. Program potom treba da izračuna aritmetičku
sredinu i standardnu devijaciju unetih brojeva (formule za računanje su date na kraju zadatka).
Nakon toga, program treba da iz liste izbaci sve one čija se vrednost razlikuje od srednje vrednosti za
više od izračunate standardne devijacije. Na kraju, program treba da ispiše rezultujuću listu i oslobodi
sve alocirane resurse.

Moj code:
http://snk.to/f-cdpf233u
[ krle_zr @ 17.08.2013. 10:40 ] @

Nisam puno gledao ali proveri ovu liniju koda:

Code:

   if (abs(tekuci^.info-ar_sredina(prvi,n))>devijacija(prvi,n)) then begin


Tu imas uslov koji se nije zadovoljen i onda se vrti u petlji za istu stavku tekuci a ne prelazi na sledeci i oslobadja je.

Ako treba pomoc javi pa cu pogledati detaljnije, da pomognem ako mogu.

Pozdrav!