Esercizi in pascal

Appunto inviato da
/5

Ecco alcuni esercizi svolti in laboratorio di informatica utilizzando il pascal. Per aprirli occorre entrare in dos e nel pascal, dopodichè aprire il file direttamente da li.(Zip di 22 file) (0 pagine formato pas,altro)

program vett_ricercaseq; const MAX=10; VAR V:array[1..MAX] of INTEGER; I,valore:integer; Procedure lettura_vettore; begin writeln('insere dati del vettore'); for I:=1 to MAX do begin writeln(I,'.'); readln(V[I]); end; end; procedure ricerca_vettore; begin
.