FSharp Code Sample

.gitignore

@@ -0,0 +1,3 @@
+*.exe
+*.out
+*.swp

ACC.c

@@ -14,5 +14,5 @@ int main() {
 	int _b;
 	scanf("%d", &_b);
 	addnmul(_a, _b);
-	return 0;                
+	return 0;
 }

ACC.cc

@@ -1,34 +1,16 @@
-#include <map>
-#include <set>
-#include <list>
-#include <cmath>
-#include <ctime>
-#include <deque>
-#include <queue>
-#include <stack>
-#include <bitset>
-#include <cstdio>
-#include <vector>
-#include <cstdlib>
-#include <numeric>
-#include <sstream>
 #include <iostream>
-#include <algorithm>
 using namespace std;
 
 void addnmul(int a, int b) {
-cout << a+b;
-cout << "\n";
-cout<< a*b;
-
+  cout << a+b;
+  cout << "\n";
+  cout<< a*b;
 }
 
 int main(){
-	int _a;
-	cin >> _a;
-	int _b;
-	cin >> _b;
-addnmul(_a, _b);
-
-	return 0;
+    int a, b;
+    cin >> a >> b;
+    addnmul(a, b);
+
+    return 0;
 }

ACC.fs

@@ -0,0 +1,12 @@
+open System
+
+let processInt (a: int) (b: int) : unit =
+    printfn "%d" (a + b)
+    printfn "%d" (a * b)
+
+[<EntryPoint>]
+let main argv =
+    let a = Console.ReadLine() |> int
+    let b = Console.ReadLine() |> int
+    processInt a b
+    0