summaryrefslogtreecommitdiff
path: root/2/2.ha
blob: 83ba3b8c3a30b20e3b60a1d5bbd12d7ca8b7cf24 (plain)
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
use fmt;
use bufio;
use os;
use strings;
use strconv;

export fn main() void = {
	const sc = bufio::newscanner(os::stdin);
	defer bufio::finish(&sc);

	let safereports = 0;
	for (const line => bufio::scan_line(&sc)!) {
		const spl = strings::split(line, " ");
		defer free(spl);
		let safe = true;
		let inc: (bool | void) = void;
		for (let i = 1z; i < len(spl); i += 1) {
			const s1 = strconv::stoi(spl[i-1])!;
			const s2 = strconv::stoi(spl[i])!;
			const diff = if (s1 < s2) {
				match (inc) {
				case void =>
					inc = true;
				case let inc: bool =>
					if (!inc) {
						safe = false;
						break;
					};
				};
				yield s2 - s1;
			} else {
				match (inc) {
				case void =>
					inc = false;
				case let inc: bool =>
					if (inc) {
						safe = false;
						break;
					};
				};
				yield s1 - s2;
			};
			if (diff <= 0 || diff > 3) {
				safe = false;
				break;
			};
		};
		if (safe) {
			fmt::printfln("{}: Safe", line)!;
			safereports += 1;
		} else {
			fmt::printfln("{}: Unsafe", line)!;
		};
	};
	fmt::printfln("{} reports are safe", safereports)!;
};