
Вот в этой части кода:
.........................
For k:=1 to n do
begin
y:=0;
r:=m[z+j]; вот в этом месте, на знаке / (деления)
x:= r/ m[11]; <=====<=====
if m[z] > 0 then ........................
..........................
Мне при проверке выдаёт:
Incompatible types: got "s80REAL@ ecpected "smallin... далее ничего
Что делать? m - это у меня массив