Hold[FullForm[{1 , 2 , 3}]]

Table[elementMojejTabelki[i],{i , 1 , 10}]

FullForm[Table[elementMojejTabelki[i],{i , 1 , 10}]]

{1 , 2 , 3 , 4}[[1]]

Hold[FullForm[{1 , 2 , 3 , 4}[[1]]]]

{1 , 2 , 3 , 4}[[-1]]

{1 , 2 , 3 , 4}[[-2]]

{1 , 2 , 3 , 4}[[2;;3]]

Hold[FullForm[{1 , 2 , 3 , 4}[[2;;3]]]]

{1 , 2 , 3 , 4}[[-2;;]]

{1 , 2 , 3 , 4}[[;;-2]]

Hold[FullForm[{1 , 2 , 3 , 4}[[-2;;]]]]

Hold[FullForm[{1 , 2 , 3 , 4}[[-2;;-1]]]]

mojaDwuWymiarowaTabelka=Table[el[row , col] , {row , 1 , 3} , {col , 1 , 4}];

TableForm[mojaDwuWymiarowaTabelka , TableHeadings->{{"pierwszy rząd" , "drugi rząd" , "trzeci rząd"},{"pierwsza kolumna" , "druga kolumna" , "trzecia kolumna" , "czwarta kolumna"}}]

MatrixForm[mojaDwuWymiarowaTabelka]

{1 , 2}

{3 , 4}

Join[{1 , 2} , {3 , 4}]

Join[{{1 , 11} , {2 , 22}} , {{3 , 33} , {4,44}}]

{1 , 2 , 3 , 4}[[0]]

FullForm[{1 , 2 , 3 , 4}]

Head[{1 , 2 , 3 , 4}]

?Append

Append[{1 , 2 , 3} , 4]

?AppendTo

krótkaLista = {1 , 2 , 3 , 4};

Print[krótkaLista]

AppendTo[krótkaLista , 5]

Print[krótkaLista]

Partition[{1 , 2 , 3 , 4 , 5 , 6},2]

%//TableForm

Hold[FullForm[f[x]]]

Hold[FullForm[x//f]]

Riffle[{4 , 3 , 1 , 2},{5 , 8 , 6 , 7}]

Partition[Riffle[{4 , 3 , 1 , 2},{5 , 8 , 6 , 7}] , 2]

f/@{1 , 2 , 3 , 4}

Hold[FullForm[f/@{1 , 2 , 3 , 4}]]

(*f*)

(*{1 , 2 , 3 , 4}*)

(*{f[1] , f[2] , f[3] , f[4]}*)

f[x_]:=Point[x];

myPointData = Partition[Riffle[{4 , 3 , 1 , 2},{5 , 8 , 6 , 7}] , 2]

g/@myPointData

f/@myPointData

Graphics[f/@myPointData , Axes->True , PlotRange->All , AxesOrigin->{3 , 7} , AxesLabel->{"X" , "Y"} , PlotLabel->"moje punkty"]

(*ESC + pi + ESC*)

Plot[Sin[x] , {x , -π , π} , Axes->False ,Frame->True, PlotLabel->"sinus"]

Plot[Sin[x] , {x , -π , π} , Axes->False ,Frame->True, PlotLabel->"sinus"]//FullForm

Graphics[
{
{
Red , 
Circle[{0,0} , 1] , 
{
Blue , 
Point[{0.5 , 0.5}]
},
Disk[{-0.2 , 0.5} , 0.3]
} , 
{
Thick , 
Green , 
Line[{{0.1 , -0.1} , {0.5 , -0.8}}]
}
}
]