| V I S U A L I Z Z A D I S C U S S I O N E |
| altrochelaurea |
Inserito il - 31/05/2004 : 15:14:57
Ciao raga, volevo sapere cosa mette covino nelle sue prove di laboratorio, quindi riferite al corso A e quanto tempo dà per gli esercizi, sul suo sito c'è scritto che basta fare correttamente un punto per passare la prova con voto minimo, è vero?
 |
| 5 U L T I M E R I S P O S T E (in alto le più recenti) |
| strategie |
Inserito il - 13/06/2004 : 19:36:57
Problema: Implementare uno stack utilizzando un array di 5 elementi interi; in particolare realizzare le seguenti procedure/funzioni:
- Inserimento(push) e estrazione(pop)/visualizzazione di elementi dello stack;
- funzionalità di stack pieno, stack vuoto;
-somma degli elementi dell'array, utilizzando la funzione pop;
-creazione di un array di elementi pari e di un array di elementi dispari, utilizzando push e pop.
Tempo:1 ora e mezza
Prova superata se il programma viene compilato senza errori e se risolve correttamente uno fra i quesiti proposti. |
| ciccibaldo |
Inserito il - 10/06/2004 : 16:57:50
Qualcuno mi sa dire qual'era la traccia della prova laboratorio di programmazione (corso A - covino) che si è tenuta il 7 giugno???
Grazie in anticipo per la risposta!  |
| silent |
Inserito il - 07/06/2004 : 12:37:55
è l'eliminazione di doppi da un'array |
| silent |
Inserito il - 07/06/2004 : 12:36:41
scusate potreste dare un'occhiata a questo esercizio e dirmi se è fatto bene o c'è qualche errore:
program elimdoppi;
uses wincrt;
const dim = 1000;
type vettore = array [1..dim] of integer;
var n,i,j,aux:integer;
vet:vettore;
scambio:boolean;
begin
repeat
write('Inserisci numero di elementi: ');
readln(n);
until (n>=1) and (n<=dim);
for i:=1 to n do
begin
write('Inserisci ',i,' ° elemento: ');
readln(vet[i]);
end;
repeat
scambio:=false;
for i:=1 to n-1 do
if vet[i] > vet[i+1] then
begin
aux:=vet[i];
vet[i+1]:=aux;
vet[i]:=vet[i+1];
scambio:=true;
end;
until scambio = false;
i:=2;
while (vet[i-1] <> vet[i]) and (i < n) do
i:=i+1;
if vet[i-1] <> vet[i] then
i:=i+1;
j:=i-1;
while i < n do
begin
i:=i+1;
if vet[i-1] <> vet[i] then
begin
j:=j+1;
vet[j]:=vet[i];
end;
end;
n:=j;
for i:=1 to n do
write(vet[i]:3);
end.
|
| Ainaf |
Inserito il - 05/06/2004 : 15:40:06
L'ultima prova di laboratorio di gennaio prevedeva:
Dato un array del tipo
[a,b,a,c,a,c,.....]
- effettuare inserimento
- ordinarlo
- contare quante coppie di aa,bb,cc ci sono...
|
