Date post: | 01-May-2015 |
Category: |
Documents |
Upload: | martino-de-stefano |
View: | 215 times |
Download: | 1 times |
Cos’è un Cos’è un programma?programma?
LLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
UN ELENCO DI ISTRUZIONI,
APPARTENENTI A UN BEN DEFINITO
LINGUAGGIO, CHE DICE AL COMPUTER
COSA FARE
I linguaggiI linguaggiLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
• BASIC
• PASCAL
• C
• JAVA
• ASP.NET
• ………
Le istruzioniLe istruzioniLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
LE ISTRUZIONI SONO COMANDI
SEMPLICI, PRECISI, CHE FANNO
COMPIERE AL COMPUTER UNA
SINGOLA OPERAZIONE BEN DEFINITA
STAMPA, CHIUDI, CANCELLA, SOMMA…
Le istruzioniLe istruzioniLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
MOLTE ISTRUZIONI SONO PAROLE
INGLESI CHE RICORDANO L’AZIONE CHE
FANNO COMPIERE
STAMPA = PRINT
FINE = END
SE…ALLORA… = IF…THEN…
Le istruzioniLe istruzioniLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
…MA NON TUTTE…
INKEY$ (legge un dato dalla tastiera)
TRON (istruzione di debugging)
WEND (chiude un ciclo While)
La sintassiLa sintassiLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
LE ISTRUZIONI DEVONO ESSERE
SCRITTE SECONDO UNA PRECISA
SINTASSI, SENZA IL MINIMO ERRORE
PRINTCIAO
NON FUNZIONE, SI SCRIVE:
PRINT “CIAO”
Scrivere un Scrivere un programmaprogramma
LLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER SCRIVERE UN PROGRAMMA
SERVE…UN PROGRAMMA,
L’EDITORE
CHE PERMETTE DI SCRIVERE,
PROVARE, CORREGGERE IL PROPRIO
PROGRAMMA
Scrivere le istruzioniScrivere le istruzioni
LLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
LE ISTRUZIONI SI SCRIVONO RIGA PER
RIGA:
OGNI RIGA E’ UN’ISTRUZIONE
OGNI ISTRUZIONE OCCUPA UNA RIGA
PER IMMETERE UNA NUOVA
ISTRUZIONE SI VA A CAPO
Un programma molto Un programma molto semplicesemplice
LLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PRINT “tutto bene”
END
E’ FORMATO DA SOLE DUE ISTRUZIONI:
PRINT: SCRIVE SULLO SCHERMO CIO’
CHE SI TROVA ALLA SUA DESTRA
END: TERMINA IL PROGRAMMA
Costanti e variabiliCostanti e variabiliLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PROVA A SCRIVERE E A FAR ESEGUIRE
IL SEGUENTE PROGRAMMA
PRINT “A”
PRINT 5
PRINT A
PRINT A$
END
Costanti e variabiliCostanti e variabiliLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
IL RISULTATO SARA’ IL SEGUENTE:
PERCHE’ QUESTE DIFFERENZE?
A
5
0
Costanti di stringaCostanti di stringaLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
“A”, “TUTTO BENE”, “CIAO”…
INSOMMA, QUALUNQUE COSA SI TROVI
TRA VIRGOLETTE E’ CONSIDERATA UNA
PAROLA E VIENE SCRITTA COSI’ COM’E’
SI CHIAMANO
COSTANTI DI STRINGA
Costanti numericheCostanti numericheLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
5, 3.14, 5321…..
SONO NUMERI FISSI E VENGONO
SCRITTI COSI’ COME SONO
SI CHIAMANO
COSTANTI NUMERICHE
Variabili numericheVariabili numericheLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
A, X1, SOMMA, LATO….
SONO VARIABILI NUMERICHE E
POSSONO CAMBIARE DI VALORE PIU’
VOLTE DURANTE L’ESECUZIONE DEL
PROGRAMMA
IL VALORE INIZIALE DI OGNI VARIABILE
NUMERICA E’ ZERO
Variabili di stringaVariabili di stringaLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
A$, X$, NOME$….
SONO VARIABILI DI STRINGA E
RAPPRESENTANO PAROLE O FRASI
ANZICHE’ NUMERI
IL VALORE INIZIALE DI OGNI VARIABILE
DI STRINGA E’ IL CARATTERE NULLO “”
AssegnazioneAssegnazioneLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER ASSEGNARE UN VALORE DIVERSO
DA ZERO A UNA VARIABILE SI USA
L’ISTRUZIONE
=
A SINISTRA DI = STA LA VARIABILE, A
DESTRA IL VALORE CHE GLI SI VUOLE
DARE
AssegnazioneAssegnazioneLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
ESEMPI:
A = 25
X1 = 13 + 6
ANCHE VERE E PROPRIE FORMULE:
AREA = BASE*ALTEZZA/2
AssegnazioneAssegnazioneLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
UN PROGRAMMA DI ESEMPIO: CALCOLA
LA SOMMA DI TRE NUMERI
A = 7
B = 12
C = 9
SOMMA = A + B + C
PRINT SOMMA
END
AssegnazioneAssegnazioneLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
LO STESSO PER ASSEGNARE UN
VALORE A UNA VARIABILE DI STRINGA
X$ = “CIAO”
NOME$ = “MARIO”
AssegnazioneAssegnazioneLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
NON SI PUO’ ASSEGNARE UN VALORE
DI STRINGA A UNA VARIABILE
NUMERICA O VICEVERSA
X$ = 5
N = “MARIO”
SONO ERRATE
Immissione dei datiImmissione dei datiLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
L’ISTRUZIONE PER CHIEDERE
ALL’UTENTE DI IMMETERE UN DATO E’:
INPUT
CON QUESTA ISTRUZIONE E’ L’UTENTE
DEL PROGRAMMA A DARE IL VALORE A
UNA VARIABILE
Immissione dei datiImmissione dei datiLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
INPUT A
IL COMPUTER CHIEDE IL VALORE DA
DARE ALLA VARIABILE A: L’UTENTE
DEVE SCRIVERE UN NUMERO E
PREMERE INVIO
Calcolo di un’areaCalcolo di un’areaLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PRINT “Introduci il valore della base”
INPUT B
PRINT “Introduci il valore dell’altezza”
INPUT H
AREA = B*H/2
PRINT “L’area è:”
PRINT AREA
END
L’outputL’outputLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
Introduci il valore della base
? 10
Introduci il valore dell’altezza
? 8
L’area è:
40
Schema di selezioneSchema di selezione
LLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
SE C’E’ IL SOLE ALLORA FACCIO UNA
PASSEGGIATA, ALTRIMENTI GUARDO
LA TELEVISIONE
SE STUDIO ALLORA SARO’
PROMOSSO, ALTRIMENTI SARO’
BOCCIATO
Schema di selezioneSchema di selezione
LLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
LO SCHEMA DI SELEZIONE IMPONE
LA SCELTA TRA DUE OPZIONI, IN
BASE AL VERIFICARSI O MENO DI
UNA CONDIZIONE
Schema di selezioneSchema di selezione
LLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
C’E IL SOLE
(CONDIZIONE)
FACCIO UNA PASSEGGIATA
(OPZIONE SCELTA SE LA CONDIZIONE E’ VERA)
LEGGO
(OPZIONE SCELTA SE LA CONDIZIONE E’ FALSA)
Schema di selezioneSchema di selezione
LLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
LA SINTASSI DELLO SCHEMA DI SELEZIONE E’
IF (CONDIZIONE) THEN
(PRIMA OPZIONE)
ELSE
(SECONDA OPZIONE)
END IF
Un esempioUn esempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
VOGLIAMO CALCOLARE LA RADICE DI A, MA SOLO SE A E’ POSITIVO:
A >= 0
E’ LA CONDIZIONE
CALCOLARE E SCRIVERE LA RADICE DI A: E’ LA PRIMA OPZIONE
SCRIVERE “NON ESISTE LA RADICE”: E’ LA SECONDA OPZIONE
Il programmaIl programmaLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
INPUT A
IF A >= 0 THEN
B = SQR(A)
PRINT B
ELSE
PRINT “NON ESISTE LA RADICE”
END IF
END
L’outputL’outputLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
? 16
4
? -9
NON ESISTE LA RADICE
Indovina un numeroIndovina un numeroLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
IL COMPUTER CHIEDE DI INDOVINARE UN NUMERO SCELTO DA LUI A CASO
PER GENERARE UN NUMERO CASUALE SI USA L’ISTRUZIONE
RND
RND E’ COMPRESO TRA 0 E 1: SE LO SI VUOLE INTERO E COMPRESO TRA 0 E
100
INT(101*RND)
Indovina un numeroIndovina un numeroLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
RANDOMIZE
X = INT(101*RND)
PRINT “INDOVINA UN NUMERO”
INPUT N
IF N = X THEN
PRINT “HAI INDOVINATO !”
ELSE
PRINT “HAI SBAGLIATO”
END IF
END
I cicliI cicliLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
A VOLTE E’ NECESSARIO RIPETERE LA STESSA ISTRUZIONE UN CERTO
NUMERO DI VOLTE
SI FORMA UN CICLO O
SCHEMA DI ITERAZIONE
I cicliI cicliLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
LE ISTRUZIONI PER CREARE UN CICLO SONO:
FOR…
…..
NEXT…
LE ISTRUZIONI DA RIPETERE STANNO TRA IL FOR E IL NEXT
Un esempio di cicloUn esempio di cicloLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
FOR N = 1 TO 5
PRINT “TUTTO BENE”
NEXT N
QUESTO CICLO STAMPA PER 5 VOLTE LA FRASE “TUTTO BENE”
N E’ IL CONTATORE
MENTRE IL CICLO VIENE RIPETUTO IL VALORE DI N PASSA DA 1 A 5: QUANDO
ARRIVA A 5 IL CICLO FINISCE
Un altro esempioUn altro esempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
SCRIVERE LE PRIME DIECI POTENZE DI 2
FOR N = 1 TO 10
X = 2^N
PRINT X
NEXT N
END
Una versione più bellaUna versione più bellaLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PRINT “Fino a che ordine vuoi arrivare?”
INPUT MAX
PRINT “ LE POTENZE DI 2”
PRINT “ESPONENTE”,”POTENZA”
FOR N = 1 TO MAX
X = 2^N
PRINT N, X
NEXT N
END
L’outputL’outputLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
“Fino a che ordine vuoi arrivare?”
? 5
LE POTENZE DI 2
ESPONENTE POTENZA
1 2
2 4
3 8
4 16
5 32
Cicli whileCicli whileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
UN ALTRO MODO PER FARE UN CICLO
E’ USARE LE ISTRUZIONI
WHILE condizione
…
WEND
RIPETE IL CICLO FINCHE’ LA
CONDIZIONE E’ VERA
Un esempioUn esempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
IL PROGRAMMA CHIEDE UNA PASSWORD
PAROLA$ = “amici”
PROVA$ = “”
WHILE PROVA$ <> PAROLA$
PRINT “INTRODUCI LA PASSWORD”
INPUT PROVA$
WEND
PRINT “PUOI ENTRARE”
END
Indovina un numeroIndovina un numeroLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
X = INT(101*RND)
PRINT “INDOVINA UN NUMERO”
WHILE X<>N
INPUT N
IF N = X THEN
PRINT “HAI INDOVINATO !”
ELSE
PRINT “RITENTA”
END IF
WEND
END
Salvare i datiSalvare i datiLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER SALVARE I DATI PRODOTTI DA UN
PROGRAMMA E’ NECESSARIO
SCRIVERLI SU UN FILE
PER RIUTILIZZARE QUESTI DATI E’
NECESSARIO LEGGERE I FILE PRODOTTI
Uso dei filesUso dei filesLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER GESTIRE I FILES DI DATI BISOGNA
SAPERE:
• CREARE UN FILE
• APRIRE UN FILE
• SCRIVERE DATI
• LEGGERE DATI
• CHIUDERE UN FILE
Uso dei filesUso dei filesLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
UN FILE SEQUENZIALE E’ UN ELENCO DI
DATI
I DATI VENGONO SCRITTI E LETTI UNO
DOPO L’ALTRO, DAL PRIMO FINO
ALL’ULTIMO
Creazione di un fileCreazione di un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER CREARE UN FILE SU CUI SCRIVERE
DATI L’ISTRUZIONE E’:
OPEN
A UN FILE BISOGNA ASSEGNARE UN
NOME E UN NUMERO
Creazione di un fileCreazione di un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
OPEN “INDIRIZZI” FOR OUTPUT AS #1
CREA UN FILE CHIAMATO “INDIRIZZI”
GLI ASSEGNA IL NUMERO 1
SU QUESTO FILE E’ ORA POSSIBILE
SCRIVERE DEI DATI
Scrivere su un fileScrivere su un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
L’ISTRUZIONE PER SCRIVERE DATI SU UN
FILE APERTO IN MODO OUTPUT E’:
WRITE
DOPO WRITE BISOGNA DARE IL NUMERO
DEL FILE E LA COSA CHE SI VUOLE FAR
SCRIVERE
Scrivere su un fileScrivere su un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
WRITE #1, A
SCRIVE SUL FILE NUMERO 1 IL VALORE
DELLA VARIABILE A
WRITE #4, NOME$
SCRIVE SUL FILE NUMERO 4 IL VALORE
DELLA VARIABILE NOME$
Chiudere un fileChiudere un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER CHIUDERE UN FILE SI USA
L’ISTRUZIONE
CLOSE
CLOSE #2
CHIUDE IL FILE NUMERO 2
EsempioEsempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
IL PROGRAMMA REGISTRA IL TUO NOME
PRINT “DIMMI IL TUO NOME”
INPUT NOME$
PRINT “DIMMI IL COGNOME”
INPUT CON$
OPEN “UTENTE” FOR OUTPUT AS #1
WRITE #1, NOME$
WRITE #1, CON$
CLOSE #1
PRINT “ADESSO SEI REGISTRATO”
END
Leggere da un fileLeggere da un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER LEGGERE DA UN FILE ESISTENTE
BISOGNA PRIMA APRIRLO IN MODO
LETTURA
L’ISTRUZIONE PER FARLO E’ SEMPRE
OPEN, MA IL MODO E’
INPUT
Leggere da un fileLeggere da un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
OPEN “REGISTRO” FOR INPUT AS #1
APRE IL FILE CHIAMATO REGISTRO PER
LETTURA E GLI ASSEGNA IL NUMERO 1
Leggere da un fileLeggere da un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER LEGGERE I DATI L’ISTRUZIONE E’
INPUT
INPUT #3, A
LEGGE UN DATO DAL FILE NUMERO 3 E
ASSEGNA IL VALORE DI QUESTO DATO
ALLA VARIABILE NUMERICA A
Leggere da un fileLeggere da un fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
IL PROGRAMMA TI DICE IL TUO NOME
OPEN “UTENTE” FOR INPUT AS #1
READ #1, NOME$
READ #1, CON$
CLOSE #1
PRINT “BENVENUTO, TU SEI”
PRINT NOME$
PRINT CON$
END
Possibili erroriPossibili erroriLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
• SCRIVERE SU UN FILE DI INPUT
• LEGGERE DA UN FILE DI OUTPUT
• LEGGERE O SCRIVERE SU UN FILE NON APERTO
• ASSEGNARE A UN FILE UN NUMERO GIA’ ASSEGNATO
• LEGGERE UN DATO NUMERICO CON UNA VARIABILE DI STRINGA O VICEVERSA
• APRIRE PER LETTURA UN FILE INESISTENTE
• …
End of fileEnd of fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
I DATI SONO LETTI UNO DOPO L’ALTRO
SE, ARRIVATI ALL’ULTIMO DATO, SI
LEGGE ANCORA, SI VERIFICA UN
ERRORE
PER EVITARLO C’E’ LA CONDIZIONE
NOT EOF(#1)
E’ VERIFICATA FINCHE’ NON ARRIVA LA
FINE DEL FILE, POI DIVENTA FALSA
End of fileEnd of fileLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
QUESTO CICLO LEGGE TUTTI GLI INDIRIZZI
DI UNA RUBRICA E LI STAMPA
PRINT “ I MIEI INDIRIZZI”
OPEN “INDIRIZZI” FOR INPUT AS #4
WHILE NOT EOF(#4)
INPUT #4, NOME$, INDIR$
PRINT NOME$, INDIR$
WEND
CLOSE #4
END
Cerca in un elencoCerca in un elencoLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PRINT “DIMMI IL NOME DA CERCARE”INPUT CERCA$OPEN “INDIRIZZI” FOR INPUT AS #1WHILE NOT EOF(#1)
INPUT #4, NOME$, INDIR$IF CERCA$ = NOME$ THEN
PRINT “L’INDIRIZZO CHE CERCHI E’”PRINT INDIR$
END IFWENDCLOSE #4END
Aggiungere datiAggiungere datiLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
PER AGGIUNGERE DATI A UN FILE GIA’
ESISTENTE BISOGNA APRIRLO IN MODO
APPEND
OPEN “RUBRICA” FOR APPEND AS #1
PER TUTTO IL RESTO E’ UN NORMALE FILE
DI SCRITTURA
Aggiungere datiAggiungere datiLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
QUESTO PROGRAMMA AGGIUNGE UN INDIRIZZO ALLA RUBRICA
PRINT “AGGIUNGI UN NOME ALLA RUBRICA”
INPUT NOM$
PRINT “INDIRIZZO?”
INPUT INDIR$
OPEN “INDIRIZZI” FOR APPEND AS #1
WRITE #1, NOM$, INDIR$
CLOSE #1
END
ArrayArrayLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
A NOME$ X…
SONO SINGOLE VARIABILI
A(1) A(2) A(3) A(4) …
SONO SINGOLI ELEMENTI DI UN’UNICA SCHIERA DI VARIABILI O
ARRAY
ArrayArrayLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
UN ARRAY E’ CARATTERIZZATO DA
UN NOME
UGUALE PER TUTTI GLI ELEMENTI
UN INDICE
CHE CONTRADDISTINGUE I SINGOLI ELEMENTI
ArrayArrayLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
R(7)
E’ IL SETTIMO ELEMENTO (INDICE = 7) DELL’ARRAY CHIAMATO R
INDIRIZZO$(3)
QUESTO, AL CONTRARIO DEL PRECEDENTE, E’ UN ARRAY DI STRINGA
Elementi degli arrayElementi degli arrayLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
OGNI SINGOLO ELEMENTO DI UN ARRAY E’ UNA VARIABILE E SI COMPORTA IN TUTTO
E PER TUTTO COME UNA NORMALE VARIABILE
Elementi degli arrayElementi degli arrayLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
ANCHE L’INDICE DI UN ELEMENTO PUO’ ESSERE A SUA VOLTA UNA VARIABILE
LATO(N)
E’ L’ N-ESIMO ELEMENTO DELL’ARRAY CHIAMATO LATO
EsempioEsempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
SCRIVE UN ELENCO DI TRE NUMERI
TEL(1) = 032367855
TEL(2) = 032456712
TEL(3) = 032349877
PRINT “I NUMERI DI TELEFONO SONO:”
FOR K = 1 TO 3
PRINT TEL(K)
NEXT K
END
Programmi di esempioProgrammi di esempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
TROVA I DIVISORI DI UN NUMERO
PRINT “INTRODUCI UN NUMERO”
INPUT P
LIMITE = P/2
PRINT “ I DIVISORI PROPRI DEL NUMERO DATO SONO: “
FOR N = 2 TO LIMITE
QUOZIENTE = P/N
QUOZINTERO = INT(QUOZIENTE)
IF QUOZINTERO = QUOZIENTE THEN
PRINT N
END IF
NEXT N
END
Programmi di esempioProgrammi di esempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
TROVA I DIVISORI DI UN NUMERO E LI METTE IN UN ARRAY
PRINT “INTRODUCI UN NUMERO”
INPUT P
LIMITE = P/2
ND = 0
FOR N = 2 TO LIMITE
QUOZIENTE = P/N
QUOZINTERO = INT(QUOZIENTE)
IF QUOZINTERO = QUOZIENTE THEN
ND = ND + 1
DIVISORI(ND) = N
END IF
NEXT N
…
Programmi di esempioProgrammi di esempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
…
IF ND>0 THEN
PRINT “I DIVISORI PROPRI DEL NUMERO SONO:”
FOR K = 1 TO ND
PRINT DIVISORI(K)
NEXT K
ELSE
PRINT “IL NUMERO E’ PRIMO”
END IF
END
Programmi di esempioProgrammi di esempioLLAA
PPRROOGGRRAAMMMMAAZ Z I I OONNEE
INVIA UNA LETTERA PRESTAMPATA
PRINT “INTRODUCI IL NOME DELL’ABBONATO”
INPUT NOME$
PRINT “INTRODUCI L’INDIRIZZO”
INPUT INDIRIZZO$
PRINT “MESE DI SCADENZA DELL’ABBONAMENTO”
INPUT MESE$
CLS
PRINT “Gentile Signor”
PRINT NOME$
PRINT INDIRIZZO$
PRINT “Le comunichiamo che il suo abbonamento scadrà il mese di”
PRINT MESE$
PRINT “ Distinti saluti”