Delphi-Quellcode:
a := StrToInt(Edit1.Text) div StrToInt(Edit2.text);
b := StrToInt(Edit1.Text) mod StrToInt(Edit2.Text);
Label1.Caption := IntToStr(a) + ' ' + IntToStr(b) + '/2';
So ungefähr könnte es aussehen. Ist lediglich nur ein Beispiel, welches Du auf Dein Programm anpassen musst.