4 lines
79 B
ObjectPascal
4 lines
79 B
ObjectPascal
|
|
##
|
|||
|
|
var x := 2.0;
|
|||
|
|
SeqGen(6,x,a → (a + x/a) / 2).Last.Println;
|
|||
|
|
x.Sqrt.Print;
|