Matteo Pistolesi Esercizio 50 pagina 301 1 Testo

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 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 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 = Cont +1 F CC > 50 F P > PM o V Contm = Contm + 1 F Contm = 1 V PM Fine PM = P V PM = P B A 5

Una volta aperto Visual Basic creiamo una Label, una Texbox ed un Command. Button. Label Texbox Proprietà Label: (Name: lbl. Modelli) (Caption: Digitare il numero modelli) Texbox: (Name: txt. Modelli) (Text: dovete cancellare il contenuto) Command. Buttan: (Name: cmd. Calcola) (Caption: Avanti) Command. Button 6

Ecco, adesso cliccando due volte su “Avanti” (Command. Button), si aprirà una finestra, dove dobbiamo scrivere lo Pseudocodice. Descrizione delle variabili Ricordiamo di mettere lo Pseudocodice dentro il “cmd. Calcola_click” Pseudocodice 7