[Konrad]

1. C[25-i] :=A[25-i]/B[25-i]- C[25-i+1];
не вяжеться с A,B:Byte;
2. C[25-i] :=A[25-i]/B[25-i]
не вяжеться с C : Array [1..25] Of Integer;