| V I S U A L I Z Z A D I S C U S S I O N E |
| kizzu |
Inserito il - 29/08/2005 : 10:47:20
scusate,dato il seguente scorcio di programma, e mandato in esecuzione,dopo aver inserito gli elementi,la schermata in dos, va via dopo alcuni secondi,perchè?come posso risolvere sto problema?grazie per l'attenzione,e scusate la bassezza della domanda.....
PROGRAM varie_array (input,output);
CONST
n_elementi=5;
TYPE
mio_Array=ARRAY[1..n_elementi] OF INTEGER;
VAR
a, i:integer;
vet_1:mio_Array;
BEGIN
(* Inzializzazione di vet_1 *)
FOR i:=1 TO n_elementi DO vet_1[i]:=0;
(* Lettura di vet_1 *)
write('Inserisci gli elementi di vet_1');
FOR i:=1 TO n_elementi DO read(vet_1[i]);
(* Visualizzazione di vet_1 *)
writeln('Elementi di vet_1');
FOR i:=1 TO n_elementi DO writeln(vet_1[i]);
END. |
| 12 U L T I M E R I S P O S T E (in alto le più recenti) |
| Dragon83 |
Inserito il - 03/09/2005 : 17:59:58
penso che per sapere i numeri che cominciano per 1 dovresti dichiarare le variabili dei numeri non come integer, ma come string. A questo punto dovrai impostare un if per sapere se la prima "casella" della stringa di caratteri è 1 oppure no.
Penso che si possa fare così... |
| kizzu |
Inserito il - 03/09/2005 : 08:58:51
 |
| kizzu |
Inserito il - 31/08/2005 : 12:31:13
ho gia dato un'occhiata ma..nn riesco a risolvere questi punti...Data una sequenza di numeri in input, scrivere il programma che calcola quanti sono....quanti sono quelli che cominciano per uno, per due, per tre….
 |
| Sinkler |
Inserito il - 31/08/2005 : 12:15:01
guarda ci sono molti programmi simili nella sezione download:
http://www.laureateci.it/forum/topic.asp?TOPIC_ID=1050
poi se proprio nn ci riesci o hai qualche problema ci dici dove! |
| kizzu |
Inserito il - 31/08/2005 : 11:22:31
5. Conversione
Data una sequenza di numeri in input, scrivere il programma che calcola quanti sono, il minimo, il massimo, la somma, la media, quanti sono quelli che cominciano per uno, per due, per tre….
|
| Sinkler |
Inserito il - 31/08/2005 : 11:05:00
scusa quale sarebbe l'esercitazione num.3?
se posti la traccia è meglio! |
| kizzu |
Inserito il - 31/08/2005 : 10:42:40
..ho provato anche le altre soluzioni ma...senza risultato!!!!vabe..un'altra domanda, sapete dove posso trovare le soluzioni alle tracce di laboratorio dell'anno 2003-04 presenti in http://www.di.uniba.it/~proga/#Tracce ???....in particolare mi servirebbe la soluzione dell'esercitazione num. 3 il 5 ex. nn riesco a risolvere il primo ed ultimo punto....!!!!lo so, sono messo male, per questo chiedo il vostro aiuto!!!!grazie! |
| rel |
Inserito il - 30/08/2005 : 03:02:25
scusate,dato il seguente scorcio di programma, e mandato in esecuzione,dopo aver inserito gli elementi,la schermata in dos, va via dopo alcuni secondi,perchè?come posso risolvere sto problema?grazie per l'attenzione,e scusate la bassezza della domanda.....
Io sono sempre entrato in Prompt di ms dos (start -> esegui -> cmd) e non hai bisogno di inserire nè readln alla fine nè altro.. |
| genius |
Inserito il - 29/08/2005 : 19:08:42
Citazione:
Messaggio inserito da kizzu
dopo averti ringrazziato tanto per aver risposto, devo dirti che fra le tante soluzioni da me provate c'era anche qsta....nn mi FuNzIoNaAaAaAa!!!!!!!!!!(penso che faro come la faccina affianco!!!)
scusa, non avevo letto attentamente il tuo programma... manca anke un
"uses crt;"
dopo la prima riga del programma:
PROGRAM varie_array (input,output);
uses crt;
CONST
n_elementi=5;
TYPE
mio_Array=ARRAY[1..n_elementi] OF INTEGER;
VAR
a, i:integer;
vet_1:mio_Array;
BEGIN
(* Inzializzazione di vet_1 *)
FOR i:=1 TO n_elementi DO vet_1[i]:=0;
(* Lettura di vet_1 *)
write('Inserisci gli elementi di vet_1');
FOR i:=1 TO n_elementi DO read(vet_1[i]);
(* Visualizzazione di vet_1 *)
writeln('Elementi di vet_1');
FOR i:=1 TO n_elementi DO writeln(vet_1[i]);
END. |
| Sinkler |
Inserito il - 29/08/2005 : 19:03:31
PROGRAM varie_array (input,output);
CONST
n_elementi=5;
TYPE
mio_Array=ARRAY[1..n_elementi] OF INTEGER;
VAR
i :integer;
vet_1:mio_Array;
BEGIN
(*Inzializzazione di vet_1*)
FOR i:=1 TO n_elementi DO
vet_1[i]:=0;
(* Lettura di vet_1 *)
writeln('Inserisci gli elementi di vet_1');
FOR i:=1 TO n_elementi DO
readln(vet_1[i]);
(* Visualizzazione di vet_1 *)
writeln('Elementi di vet_1');
FOR i:=1 TO n_elementi DO
write(vet_1[i]:5);
readln;
END. |
| kizzu |
Inserito il - 29/08/2005 : 17:28:06
dopo averti ringrazziato tanto per aver risposto, devo dirti che fra le tante soluzioni da me provate c'era anche qsta....nn mi FuNzIoNaAaAaAa!!!!!!!!!!(penso che faro come la faccina affianco!!!) |
| genius |
Inserito il - 29/08/2005 : 10:56:36
PROGRAM varie_array (input,output);
CONST
n_elementi=5;
TYPE
mio_Array=ARRAY[1..n_elementi] OF INTEGER;
VAR
a, i:integer;
vet_1:mio_Array;
BEGIN
(* Inzializzazione di vet_1 *)
FOR i:=1 TO n_elementi DO vet_1[i]:=0;
(* Lettura di vet_1 *)
write('Inserisci gli elementi di vet_1');
FOR i:=1 TO n_elementi DO read(vet_1[i]);
(* Visualizzazione di vet_1 *)
writeln('Elementi di vet_1');
FOR i:=1 TO n_elementi DO writeln(vet_1[i]);
readln;
END. |
