Membuat prosedur di delphi

private
	procedure <procedure name>(<parameters>:<parameter datatypes>);

Example
	procedure isFactor(iNum:Integer);
URANIUM235