Problema di informatica

[Mr_LiNuX]

I dati relativi alla piovosità relativa a un determinato mese sono riportati in una tabella con:
-giorno;
millimetri di piogga caduti;
si realizzi un programma che indichi:
a)il giorno in cui si è avuta la maggiore piovosità;
b)la media dei millimetri di pioggia caduta relativa asi solio giorni in cui è piovuto;
c)il numero di giorni in cui è piovuto.

Risolverlo in visual basic e con la struttura Do While-Loop e array di record....

Vediamo chi è il più bravo! (b2b)

[Ikitt]

[...]
Risolverlo in visual basic e con la struttura Do While-Loop e array di record....
[...]

Proprio in VB!?!  :'(

[edit] Allora mi cimento a meta` :P

Codice: Seleziona tutto

def carica(filename):
     res = []
     for line in open(filename):
         g, mm = line.strip().split()
         res.append((g, int(mm)))

def max_piov(data):
    def _cmp(a, b):
        ga, mma = a
        gb, mmb = b
        return cmp(mma, mmb)
    d = data[:]
    d.sort(cmp=_cmp)
    g, mm = d[0]
    return g

def piovuti(data)
    return [ mm for g, mm in data if mm > 0 ]

def media_mm(data);
    mms =piovuti(data)
    return sum(mms)/len(mms)

def piovosi(data):
    return len(piovuti(data))

:P

[Mr_LiNuX]

eh purtroppo si...a scuola utilizziamo visual basic!

[jepessen]

Cambiare scuola non si può?

[Mr_LiNuX]

Cambiare scuola non si può?

mmmmmmmmmmmm no...non credo...

[...]
Risolverlo in visual basic e con la struttura Do While-Loop e array di record....
[...]

Proprio in VB!?!  :'(

[edit] Allora mi cimento a meta` :P

Codice: Seleziona tutto

def carica(filename):
     res = []
     for line in open(filename):
         g, mm = line.strip().split()
         res.append((g, int(mm)))

def max_piov(data):
    def _cmp(a, b):
        ga, mma = a
        gb, mmb = b
        return cmp(mma, mmb)
    d = data[:]
    d.sort(cmp=_cmp)
    g, mm = d[0]
    return g

def piovuti(data)
    return [ mm for g, mm in data if mm > 0 ]

def media_mm(data);
    mms =piovuti(data)
    return sum(mms)/len(mms)

def piovosi(data):
    return len(piovuti(data))

:P

che codifica sta utilizzando?....io utilizzo quella dim N as integer....ecc ecc nella fase dichiarativa....poi per il resto Do while I>=N and ecc ecc per chiudere il ciclo Loop

[Ikitt]

che codifica sta utilizzando?....io utilizzo quella dim N as integer....ecc ecc nella fase dichiarativa....poi per il resto Do while I>=N and ecc ecc per chiudere il ciclo Loop

Non e` VB (ecco perche` ho scritto "mi cimento a meta`" ) te puoi considerarlo pseudocodice, comunque