1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
# Task 1: Max Positive Negative
# Submitted by: Mohammad Sajid Anwar
#
# You are given an array of integers, @ints.
# Write a script to return the maximum number of either positive or negative integers in the given array.
#
# Example 1
# Input: @ints = (-3, 1, 2, -1, 3, -2, 4)
# Output: 4
#
# Count of positive integers: 4
# Count of negative integers: 3
# Maximum of count of positive and negative integers: 4
#
# Example 2
# Input: @ints = (-1, -2, -3, 1)
# Output: 3
#
# Count of positive integers: 1
# Count of negative integers: 3
# Maximum of count of positive and negative integers: 3
#
# Example 3
# Input: @ints = (1,2)
# Output: 2
#
# Count of positive integers: 2
# Count of negative integers: 0
# Maximum of count of positive and negative integers: 2
defmodule MaximumOfPositiveAndNegative do
def positive(ints) do
ints
|> Enum.count(fn x -> x > 0 end)
end
def negative(ints) do
ints
|> Enum.count(fn x -> x < 0 end)
end
def out(ints) do
IO.write( "(" <> Enum.join(ints, ",") <> ") -> ")
IO.puts( max(positive(ints), negative(ints)) )
end
end
ints = [-3, 1, 2, -1, 3, -2, 4]
MaximumOfPositiveAndNegative.out(ints)
ints = [-1, -2, -3, 1]
MaximumOfPositiveAndNegative.out(ints)
ints = [1,2]
MaximumOfPositiveAndNegative.out(ints)
|
