3.nb

(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 10.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[      1426,         57]
NotebookOptionsPosition[      1108,         40]
NotebookOutlinePosition[      1460,         56]
CellTagsIndexPosition[      1417,         53]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
 RowBox[{"FactorInteger", "[", "600851475143", "]"}]], "Input",
 CellChangeTimes->{{3.615586507010487*^9, 3.615586530179648*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"71", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"839", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"1471", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"6857", ",", "1"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.6155865130842037`*^9, 3.615586531802416*^9}}]
}, Open  ]]
},
WindowSize->{808, 587},
WindowMargins->{{4, Automatic}, {Automatic, 4}},
FrontEndVersion->"10.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (June 27, \
2014)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 143, 2, 28, "Input"],
Cell[726, 26, 366, 11, 86, "Output"]
}, Open  ]]
}
]
*)

(* End of internal cache information *)