prolo14

varie ....
funzione per mandare a capo:................nl,
write(asia),nl,
tabulazione testo con............................ barra inversa e lettera t
write(Ò/tAmericaÓ),
write(Ò/t/t/t  AmericaÓ),
tabulazione testo e mandare a capo.....barra inversa e lettera n
write(ÒAmerica/n2),
write(Ò/t/t America /n/n/nÓ),
-------------------------------------------------------------
cicli iterativi (LOOP)
azione(Contatore):-
Contatore>0,!,
 istrÎuzioni,
 Contatore1=Contatore-1,
 azione(Contatore1).
ripete istruzioni finche il contatore risulta maggiore di 0 (o di altro
valore da assegnare):decremento contatore e assegnazione nuovo valore
a variabile Contatore1 che richiama la procedura azione.
---------------------------------------------------------------
azione(Contatore):-
Contatore<10,!,
 istruzioni,
 Contatore1=Contatore+1,
 azione(Contatore1).
ripete istruzioni finche il contatore risulta maggiore di 10 (o di altro
valore da assegnare):incremento contatore e assegnazione nuovo valore
a variabile Contatore1 che richiama la procedura azione.
-------------------------------------------------------------
azione(Contatore):-
Contatore>0,!,
 istruzioni,
 Contatore1=Contatore-1,
 azione(Contatore1).
ripete istruzioni finche il contatore risulta maggiore di 0 (o di altro
valore da assegnare):decremento contatore e assegnazione nuovo valore
a variabile Contatore1 che richiama la procedura azione.