1. Neinicializuješ premennú x /soucet:=0, pocet:=0, min:=x - akú hodnotu má X ???
2. inttostr nemôžeš použiť pretože sa nejedná o celé čísla !!! Vypíš to napr. takto: FormatFloat('0.00',avg);
3. if x mod 5 = 0 then je správne...
1. Neinicializuješ premennú x /soucet:=0, pocet:=0, min:=x - akú hodnotu má X ???
2. inttostr nemôžeš použiť pretože sa nejedná o celé čísla !!! Vypíš to napr. takto: FormatFloat('0.00',avg);
3. if x mod 5 = 0 then je správne...