Подскажите плс нупу)
procedure Str(X [: Width [: Decimals ]]; var S:string);Как пользоваться - см. Help...
а мона какой-нить пример?)
function IntToStr(I: Longint): String;(пример - из справочной системы Турбо Паскаля...)
var S: string[11];
begin
Str(I, S); { <--- Вот и вызов Str }
IntToStr := S;
end;
begin
Writeln(IntToStr(-5322));
end.
Списиба
Лично мне ето помогло :D