ciao a tutti, avrei bisogno di un chiarimento su questo programma che devo svolegere:
Il file di testo Dati.txt contiene due numeri interi per ogni riga.
'Scrivere la function divisori() che:
' - ha in ingresso un numero intero positivo N
' - restituisce il numero di divisori di N (si ricorda che a divide b
' quando il resto della divisione fra b ed a vale 0; l'operatore di
' resto in VBA è mod)
'Scrivere la funzione vAssol()
' - ha in ingresso un numero intero X
' - ne restituisce il valore assoluto
'Scrivere la sub quesito2() che
' - legge i valori contenuti in ogni riga di dati.txt nelle variabili A e B
' - calcola il valore assoluto di A e B usando la funzione vAssol()
' e scrive il risultato rispettivamente nelle variabili assA e assB
' - richiama la funzione divisori() prima con assA e poi assB e scrive il
' valore restituito rispettivamente nelle variabili divA e divB
' - scrive sul file Uscita.txt
' _ 1 se divA>divB,
' _ 0 se divA=divB,
' _ -1 se divA<divB
' - ripete i punti precedenti finché il file Dati.txt non è finito
Ora, come faccio a gestire il secondo numero di ogni riga? cioè con l'istruzione Input #1, Val (ho dichiarato il file dati.txt come file 1) in teoria prendo tutta la riga, e come faccio a gestire ogni singolo numero presente in una riga del file di testo?
grazie per l'attenzione, spero in un vostro aiuto![]()