|
Program Esempio8;
Uses Crt;
type
persona=record
nome,cognome,indirizzo:string;
end;
var uno:persona;
begin
clrscr;
writeln(Inserire nome, cognome e indirizzo di una persona:);
with uno
begin
read(nome,cognome,indirizzo);
write(nome, ,cognome, abita in ,indirizzo);
end;
readln
end.
Questo esempio non rende molto lidea, ma, immaginate di avere una struttura che contiene centinaia di dati e altre strutture: vorreste continuare a scrivere il nome della variabile centinaia di volte? Il costrutto with permette di accedere ai campi di una struttura semplicemente usando il nome del campo, poiché il nome della variabile, seguito dal punto, viene automaticamente inserito dal programma usando la variabile specificata dopo with. Per far comprendere meglio, questo è quello che si sarebbe scritto senza with:
(*...*)
read(uno.nome,uno.cognome,uno.indirizzo);
write(uno.nome, ,uno.cognome, abita in ,uno.indirizzo);
(*...*)
|
|
Feeds
Sondaggio
Condividi
Numeri
