Почему данная программа, написанная на с++, выводит в ответе только числитель дроби? подскажите, как это исправить?

# include

using namespace std;

int main ()

{int a,b,d,z,x;

cin >>a>>d>>b;

z=(a*a-3)*d;

x=b*b-3;

float e;

e=float (z)/x;

cout << e ;
}

Пишу на Delphi (ObjectPascal):

function Summa(a,b:integer):string;
var a1,b1:integer;
begin   //находим сумму первого числа
a1:=(a div 1000)+((a div 100)mod 10)+((a mod 100)div 10)+(a mod 10);

//находим сумму второго числа
b1:=(b div 1000)+((b div 100)mod 10)+((b mod 100)div 10)+(b mod 10);

//выясняем что больше
if a1>b1 then         
   Result:='Сумма цифр левого числа больше. Оно равно: '+IntToStr(a1)         
else         
Result:='Сумма цифр правого числа больше. Оно равно: '+IntToStr(b1);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin //Выполнение и вывод результата функции через нажатие кнопки
Label1.Caption:=Summa(StrToInt(Edit1.Text),StrToInt(Edit2.Text));
end;

Письменность - это важная часть всей нашей жизни. Мы пользуемся таким методом, чтобы записать некую информацию. Это дает огромный толчок науке прежде всего потому, что без письменности большая часть знаний не сохранилась бы. Разные формулы, исторические записи - за все это мы должны благодарить письменность. Если рассуждать надобность письменности с точки культуры, то следует отметить, что тут письменность оставила огромную отметку. Литературные шедевры, которые стали знаменитыми во всем мире, песни, стихи - все сохранилось благодаря письменности. Задумайтесь, что бы было, если бы письменности не существовало?

P.S. Это набросок на сочинение или доклад, его можно обогатить разными выражениями и цитатами, поискать еще некоторые факты об возникновении и истории письменности