begin WriteLn(1.4, ' becomes ', Trunc(1.4)); WriteLn(1.5, ' becomes ', Trunc(1.5)); WriteLn(-1.4, ' becomes ', Trunc(-1.4)); WriteLn(-1.5, ' becomes ', Trunc(-1.5)); end.