I like this line:

WriteLn('The balance is: ',balance:0:0);

Very neat.

Sub Xero

It should be exactly the same. Format returns a string, so there's no difference in applying the result to an Editbox or a label.
What exactly is the problem?

Sub Xero

Use the Format command like this:

VolumeCalc.Caption := Format('%.2f',[StrToFloat(EngineSizeVal.Text) / 2 / StrToFloat(CylNumVal.Text)]);


Sub Xero

Your main problem is 'balance' should be a real type, as multiplying it by 1.03 will return a non integer value. Here's how I'd do it:


program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;