выкидывает ошибку, не пойму почему
k, b   : Double;
k := (y2 - y1)/(x2 - x1);  <----raised exception class EInvalidOp with message 'invalid floating point operation'
коэффициенты равны     y2=12    y1=0    x2=4   x1= -2 
               
Application.MessageBox(PChar(floattostr(k)+' '),' ',MB_OK );    <--- выводит сообщение "2"
			
		
