Esercizio 24 pagina 299

Presentazione con Visual Basic

Magherini Ginevra 3c mercurio

Testo dell’esercizioCalcola la somma dei primi 10 numeri interi

successivi a un numero N fornito da tastiera.

Dati di input : Numero

Dati di output : somma successivi numeri

Descrizione variabili

Variabili Contenuto Tipo I/O/L

N Numero Numerico I

SOM Somma Numerico O

CONT Contatore Numerico L

Lo pseudocodiceInizio

Leggi (N)CONT=0SOM=0Ripeti

CONT=CONT+1N=N+1SOM=SOM+N

Fino a che CONT=10Scrivi (SOM)

Fine

Il diagramma a blocchiInizio

N I

CONT=0SOM=0

CONT=CONT+1N=N+1SOM=SOM+N

CONT=10 ?

SOM O

Fine

v

F

Ora riportiamolo in Visual Basic

Mettiamo Integer per dire che il numero che verrà associato a N sarà un numero intero.

Andiamo a cliccare sullo spazio bianco e scegliamo generale per andare poi a scrivere i dati input, output e di lavoro.

Ora iniziamo a svolgere l’esercizio

Mettiamo N = Val (txtN.Text) per dire vai a guardare il valore che è nella casellina che si chiama txtN.Val serve per trasformare il valore della casella a cui si riferisce in valore numerico in modo che possa essere calcolato.

Ora iniziamo con la ripetizione (Do)

Iniziamo la ripetizione mettendo Do

In Visual Basic Do equivarrebbe a ripeti per ripetere le istruzioni sotto di esso fino a che non arriviamo alla condizione finale.

Per finire la ripetizione mettiamo Loop Until, ovvero fino a che, e accanto gli scriviamo la condizione. In questo caso CONT = 10

Ora dopo aver finito con le istruzioni dobbiamo fare in modo che i risultati che abbiamo trovati ci vengano comunicati dal computer.Per fare ciò usiamo una Message Box. La Message Box è una finestrina attraverso la quale il computer ci comunica i risultati di ciò che noi gli abbiamo chiesto di fare.

Infine scriviamo End Sub per dire che il nostro codice è terminato.

Se vogliamo facilitarci l’uscita dal programma dopo aver ricevuto i risultati dal computer possiamo mettere un pulsante che nel codice si traduce in End

Ora il nostro programma è finito e possiamo andare ad eseguirlo!!