Problem:
Score : 100 points

Problem Statement

Compute A \times B.

Constraints

1 \leq A \leq 100

1 \leq B \leq 100

All values in input are integers.

Input

Input is given from Standard Input in the following format:

A B

Output

Print the value A \times B as an integer.

Sample Input 1

2 5

Sample Output 1

10

We have 2 \times 5 = 10.

Sample Input 2

100 100

Sample Output 2

10000

Solution in OCaml (4.10.0) (judge verdict: Runtime Error)

open Scanf
open Printf
open Big_int

let multiplication lst =
  let rec loop total l = match l with
      [] -> total
    | first :: rest -> if gt_big_int (mult_big_int (big_int_of_int first) (big_int_of_int total))
                                     (big_int_of_int 1_000_000_000_000_000_000) then -1
                       else loop (first * total) rest
  in loop 1 lst

let n = sscanf (read_line ()) "%d" (fun n -> n)
let a_list = List.map (fun n -> int_of_string n) (String.split_on_char ' ' (read_line ()))
let () = printf "%d\n" (multiplication a_list)