uses System.SysUtils;
var
Number: Integer;
S1, S2, S3: string;
begin
Number := 42;
S1 := IntToStr(Number);
//S1 is '42'
S2 := Format('%d', [Number]);
//S2 is '42'
S3 := Format('%.3d', [Number]);
//S3 is '042'
WriteLn('s1 is ', S1);
WriteLn('s2 is ', S2);
WriteLn('s3 is ', S3);
end.