Pascal/Input e Output: differenze tra le versioni

Contenuto cancellato Contenuto aggiunto
mNessun oggetto della modifica
m Update syntaxhighlight tags - remove use of deprecated <source> tags
 
Riga 7:
== Un semplice esempio per iniziare ==
Un semplice esempio basato sull'uso delle variabili e dell'input-output potrebbe essere un modo per personalizzare un programma, salvando in una stringa il nome dell'utente per inserirlo nelle domande.
<sourcesyntaxhighlight lang=pascal>
program username;
uses crt;
Riga 20:
readkey;
end.
</syntaxhighlight>
</source>
Analizziamo come al solito il listato riga per riga:
* dichiarazione del nome
Riga 41:
 
Alcuni compilatori, soprattutto i più vecchi, possono inoltre dare problemi nella stampa dei caratteri accentati: in questi casi l'accento può essere sostituito con un apostrofo che, per il problema relativo agli apici nelle stringhe, si deve indicare con due apici. Un'istruzione come
<sourcesyntaxhighlight lang=pascal>
writeln('Il valore è ');
</syntaxhighlight>
</source>
è preferibile sostituirla quindi con
<sourcesyntaxhighlight lang=pascal>
writeln('Il valore e''');
</syntaxhighlight>
</source>
(che stampa ''Il valore e''').
 
Riga 54:
nome_della_variabile : numero_di_cifre [: numero_di_cifre_decimali];
Ad esempio:
<sourcesyntaxhighlight lang=pascal>
writeln(n:8:6);
writeln(10+2:4);
</syntaxhighlight>
</source>
Ovvero, nel primo caso il contenuto della variabile ''n'' verrà rappresentato con 8 cifre di cui 6 decimali; nel secondo caso verranno stampati 2 spazi vuoti e poi il numero 12.
<br/>Una istruzione come questa
<sourcesyntaxhighlight lang=pascal>
writeln(n);
</syntaxhighlight>
</source>
stamperebbe invece il valore di ''n'' in notazione esponenziale (ad esempio 3.4E4 anziché 34.000).
 
Riguardo input e output, si può anche fare un esempio con i numeri di con un programma che calcoli il quadrato di un numero reale:
<sourcesyntaxhighlight lang=pascal>
program quadrato_di_un_numero;
uses crt;
Riga 79:
readkey;
end.
</syntaxhighlight>
</source>
*il programma stampa la stringa 'Inserisci un numero reale';
*con ''readln(n)'' assegna alla variabile n un valore immesso da tastiera;
Riga 99:
}}
{{cassetto|titolo=Soluzione proposta|testo=
<sourcesyntaxhighlight lang=pascal>
program scambio;
var num1, num2, tmp: integer;
Riga 119:
readln;
end.
</syntaxhighlight>
</source>
}}
* Scrivere un programma che legga un numero e lo stampi formattandolo, chiedendo all'utente quante cifre utilizzare per i decimali.
{{cassetto|titolo=Soluzione proposta|testo=
<sourcesyntaxhighlight lang=pascal>
program formatta_decimali;
var num: real;
Riga 134:
readln;
end.
</syntaxhighlight>
</source>
}}