| Autore |
 Discussione  |
|
|
kizzu
Utente medio
Regione: Puglia
Prov.: Bari
Città: Cerignola
|
 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.
|
My pc:MB:intel865 PERL,pentium 4 3.0 prescott,1Gb RAM 2.5-3-3-7,Sapphire 9600XT 256Mb,terratec cinergy 400,MAXTOR 160GB SerialATA,LG DVDRAM-4160B,LG CD-RW GCE-8520B,LG DVD-ROM GDR8163B GSACreative® Inspire™ P5800
Boia chi molla
kizzu aziz |
|
|
genius
dott. ing. cav. ...FN
Regione: Puglia
Prov.: Bari
Città: Molfetta - Caput Mundi
|
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. |
"...e se non hai morale
e se non hai passione
se nessun dubbio ti assale
perché la sola ragione che ti interessa avere
è una ragione sociale
soprattutto se hai qualche dannata guerra da fare
non farla nel mio nome
non farla nel mio nome
che non hai mai domandato la mia autorizzazione
se ti difenderai non farlo nel mio nome
che non hai mai domandato la mia opinione..."
Un blog farlocco |
 |
|
|
kizzu
Utente medio
Regione: Puglia
Prov.: Bari
Città: Cerignola
|
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!!!) |
My pc:MB:intel865 PERL,pentium 4 3.0 prescott,1Gb RAM 2.5-3-3-7,Sapphire 9600XT 256Mb,terratec cinergy 400,MAXTOR 160GB SerialATA,LG DVDRAM-4160B,LG CD-RW GCE-8520B,LG DVD-ROM GDR8163B GSACreative® Inspire™ P5800
Boia chi molla
kizzu aziz |
|
|
|
Sinkler
Croce & Delizia
Regione: Puglia
Prov.: Bari
Città: Molfetta
|
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. |
|
|
|
genius
dott. ing. cav. ...FN
Regione: Puglia
Prov.: Bari
Città: Molfetta - Caput Mundi
|
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. |
"...e se non hai morale
e se non hai passione
se nessun dubbio ti assale
perché la sola ragione che ti interessa avere
è una ragione sociale
soprattutto se hai qualche dannata guerra da fare
non farla nel mio nome
non farla nel mio nome
che non hai mai domandato la mia autorizzazione
se ti difenderai non farlo nel mio nome
che non hai mai domandato la mia opinione..."
Un blog farlocco |
|
|
|
rel
Utente assiduo
|
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.. |
|
|
|
kizzu
Utente medio
Regione: Puglia
Prov.: Bari
Città: Cerignola
|
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! |
My pc:MB:intel865 PERL,pentium 4 3.0 prescott,1Gb RAM 2.5-3-3-7,Sapphire 9600XT 256Mb,terratec cinergy 400,MAXTOR 160GB SerialATA,LG DVDRAM-4160B,LG CD-RW GCE-8520B,LG DVD-ROM GDR8163B GSACreative® Inspire™ P5800
Boia chi molla
kizzu aziz |
|
|
|
Sinkler
Croce & Delizia
Regione: Puglia
Prov.: Bari
Città: Molfetta
|
Inserito il - 31/08/2005 : 11:05:00
|
scusa quale sarebbe l'esercitazione num.3?
se posti la traccia è meglio! |
Modificato da - Sinkler in data |
|
|
|
kizzu
Utente medio
Regione: Puglia
Prov.: Bari
Città: Cerignola
|
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….
|
My pc:MB:intel865 PERL,pentium 4 3.0 prescott,1Gb RAM 2.5-3-3-7,Sapphire 9600XT 256Mb,terratec cinergy 400,MAXTOR 160GB SerialATA,LG DVDRAM-4160B,LG CD-RW GCE-8520B,LG DVD-ROM GDR8163B GSACreative® Inspire™ P5800
Boia chi molla
kizzu aziz |
|
|
|
Sinkler
Croce & Delizia
Regione: Puglia
Prov.: Bari
Città: Molfetta
|
|
|
kizzu
Utente medio
Regione: Puglia
Prov.: Bari
Città: Cerignola
|
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….
|
My pc:MB:intel865 PERL,pentium 4 3.0 prescott,1Gb RAM 2.5-3-3-7,Sapphire 9600XT 256Mb,terratec cinergy 400,MAXTOR 160GB SerialATA,LG DVDRAM-4160B,LG CD-RW GCE-8520B,LG DVD-ROM GDR8163B GSACreative® Inspire™ P5800
Boia chi molla
kizzu aziz |
|
|
|
kizzu
Utente medio
Regione: Puglia
Prov.: Bari
Città: Cerignola
|
Inserito il - 03/09/2005 : 08:58:51
|
 |
My pc:MB:intel865 PERL,pentium 4 3.0 prescott,1Gb RAM 2.5-3-3-7,Sapphire 9600XT 256Mb,terratec cinergy 400,MAXTOR 160GB SerialATA,LG DVDRAM-4160B,LG CD-RW GCE-8520B,LG DVD-ROM GDR8163B GSACreative® Inspire™ P5800
Boia chi molla
kizzu aziz |
|
|
|
Dragon83
Padawan
Regione: Puglia
Città: Foggia
|
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ì... |
|
|
| |
Discussione |
|
|
|
program.
