int velke_balenie = 0;

for(int i = 0; i<1000; i++) {

	int pocet_km = 0;
	for(int j = 0; j < 15; j++) {
		if(uniform() < 0.6) {
			pocet_km += TRIA();
		}
	}

	int kolko_namalovane = 0;
	int pocet_baleni = 0;
	while(kolko_namalovane < pocet_km) {
		kolko_namalovane += TRIA();
		pocet_baleni++;
	}

	if(pocet_baleni > 30) {
		velke_balenie++;
	}
}

Pravdepodobnost velkeho balenia velke_balenie/1000