AssignFile(myFile,'Log.txt'); Append(myFile); WriteLn(myFile,' '+(t)+' Было выдано: ' + FloatToStr(v) + 'руб. !'); CloseFile(myFile);