mat/euler/14/prog.c


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

#include <stdio.h>
#include <stdlib.h>
#define COLLATZ(n) n % 2 == 0 ? n / 2 : 3 * n + 1
int main (int argc, char ** argv) {
	if (argc != 1+1) {
		fprintf(stderr, "uporaba: %s <stevilo>\nprimer-najd. collatzova veriga pod zač. 1M: %s 1000000\n", argv[0], argv[0]);
		return 1;
	}
	unsigned long int n = strtol(argv[1], NULL, 10);
	unsigned long int c = 0; // števeC
	unsigned long int a = 0; // verigA
	unsigned long int m = 0; // maksimalna dolžina verige
	unsigned long int z = 0; // trenutna Zmagovalna številka z najdaljšo verigo
	for (; n >= 1; n--) {
		// fprintf(stderr, "\rračunam... potrebnih še %lu iteracij.", n); // botlnck
		a = n;
		c = 1;
		while (a != 1) {
			a = COLLATZ(a);
			c++;
		}
		if (c > m) {
			m = c;
			z = n;
		}
	}
	fprintf(stdout, "\rkonec. najdaljša veriga se začne z %lu in ima %lu elementov.\n", z, m);
	return 0;
}