Matteo Pistolesi
Esercizio 50 pagina 301
1
Testo dell’esercizio
Dati N modelli di ciclomotori e motocicli ( nome
del modello, cilindrata, prezzo), visualizzare il
prezzo massimo tra i modelli di cilindrata
superiore a 50 cc.
2
Descrizione delle variabili
Dati Input: n° modelli, nome del modello, cilindrata, prezzo;
Dati Output: prezzo massimo tra i modelli di cilindrata superiore a 50 cc.
Nome Variabile
Contenuto
Tipo
Inp./ Out. / L.
N
n° modelli
Numerico
Input
NM
Nome modello
Alfabetico
Input
CC
Cilindrata
Numerico
Input
P
Prezzo
Numerico
Input
PM
Prezzo massimo
Numerico
Output
Cont
Contatore
Numerico
Lavoro
Contm
Contatore magg.
di 50 cc.
Numerico
Lavoro
3
Inizio
Leggi (N)
Cont = 0
Contm = 0
Ripeti
Leggi (NM, CC, P)
Cont = Cont +1
Se CC > 50 allora
Contm = Contm +1
Se Contm = 1 allora
PM = P
Altrimenti
Adesso seguendo lo
Pseudocodice
facciamo il
Diagramma a
Blocchi
Se P > P allora
PM = P
fine Se
fine Se
fine Se
fino a che Cont = N
Scrivi (PM)
Fine
4
Inizio
N
i
Cont = 0
B
Contm = 0
i
NM,
CC,
P
A
F
Cont = N
V
Cont =
PM
Cont +1
F
CC > 50
F
P > PM
o
V
Contm = Contm + 1
F
Contm = 1
V
Fine
PM = P
V
PM = P
B
A
5
Una volta aperto Visual Basic creiamo una Label, una Texbox ed un
CommandButton.
Label
Proprietà
Texbox
Label: (Name: lblModelli)
(Caption: Digitare il
numero modelli)
Texbox: (Name: txtModelli)
(Text: dovete cancellare il
contenuto)
CommandButtan: (Name:
cmdCalcola) (Caption: Avanti)
CommandButton
6
Ecco, adesso cliccando due volte su “Avanti” (CommandButton), si aprirà
una finestra, dove dobbiamo scrivere lo Pseudocodice.
Descrizione delle
variabili
Ricordiamo di
mettere lo
Pseudocodice
dentro il
“cmdCalcola_click”
Pseudocodice
7