Последовательность вычислений и Работа с системой типов

Латин Ярослав/1ch.fs

@@ -0,0 +1,33 @@
+// For more information see https://aka.ms/fsharp-console-apps
+
+
+let mutable y1 = 1
+let _ = y1 <- y1*2 in
+let _ = y1 <- y1+1 in
+let _ = y1 <- y1+1 in
+
+printf "y1 = %A\n"y1
+
+let mutable x1 = 1
+let _ = x1 <- x1+1 in
+let _ = x1 <- x1*2 in
+let _ = x1 <- x1+1 in
+
+printf "x1 = %A\n"x1
+
+let mutable y = 1
+y <- y * 2
+y <- y + 1
+y <- y + 1
+
+
+printf "y = %A\n"y
+
+let mutable x = 1
+x <- x + 1
+x <- x * 2
+x <- x + 1
+
+
+printf "x = %A\n"x
+