if x = 0

then Edit4.Caption:= 'Происходит деление на ноль' // в поле Caption объекта Edit4 (в Delphi это будет текстовое поле ввода, но у этого поля ввода в Delphi нет поля Caption) вносится строка

else if x = 0

then Edit4.Caption:= 'Происходит деление на ноль'

else

   begin

   y:= a+b;

   z:= y-c/x;

   Edit4.Caption:= FloatToStr(x); // в поле Caption объекта Edit4 вносится конвертированное в строку число x с помощью функции FloatToStr. Число приходится конвертировать в строку, т.к. поле Caption имеет тип данных строки