Torna indietro   Hardware Upgrade Forum > Software > Programmazione

Dark Perk Ergo e Sym provati tra wireless, software via browser e peso ridotto
Dark Perk Ergo e Sym provati tra wireless, software via browser e peso ridotto
be quiet! debutta nel settore mouse da gaming con Dark Perk Ergo e Dark Perk Sym: due modelli gemelli per specifiche, con polling rate di 8.000 Hz anche in wireless, sensore PixArt PAW3950 da 32.000 DPI e autonomia dichiarata fino a 110 ore. Nel test, a 8.000 Hz si arriva a circa 30 ore reali, con ricarica completa in un'ora e mezza
DJI RS 5: stabilizzazione e tracking intelligente per ogni videomaker
DJI RS 5: stabilizzazione e tracking intelligente per ogni videomaker
Analizziamo nel dettaglio DJI RS 5, l'ultimo arrivato della famiglia Ronin progettato per videomaker solisti e piccoli studi. Tra tracciamento intelligente migliorato e ricarica ultra rapida, scopriamo come questo gimbal eleva la qualità delle produzioni.
AMD Ryzen 7 9850X3D: Zen 5, 3D V-Cache e frequenze al top per il gaming
AMD Ryzen 7 9850X3D: Zen 5, 3D V-Cache e frequenze al top per il gaming
AMD Ryzen 7 9850X3D è la nuova CPU gaming di riferimento grazie alla 3D V-Cache di seconda generazione e frequenze fino a 5,6 GHz. Nei test offre prestazioni superiori a 9800X3D e 7800X3D, confermando la leadership AMD nel gaming su PC.
Tutti gli articoli Tutte le news

Vai al Forum
Rispondi
 
Strumenti
Old 21-11-2008, 20:54   #1
gd020188
Junior Member
 
Iscritto dal: May 2008
Messaggi: 29
Algoritmo di ordinamento per selezione

Salve a tutti. Sono nuovo di queste parti. Frequento l'università e sono negato per l'informatica. Quindi mi chiedevo se potete darmi una mano nel risolvere i miei dubbi su algoritmi che per voi saranno sicuramente stupidaggini.

Devo sviluppare un algoritmo per l'ordinamento di un array tramite il metodo di selezione del massimo.

Questo è quello che ho sviluppato. Per scrivere l'algoritmo su foglio, uso il Pascal Like (o almeno questo mi pare sia il nome del linguaggio che ci è stato dato per fare queste stesure su foglio), e per metterlo sul PC uso il Fortran90.

Vi lascio l'algoritmo in Pascal Like: mi dite se è giusto? Grazie


Codice:
begin ord_sel
var : A[10] : array of real
var : t,max : real
var : i,j,m,n,p : integer
read n
for i=1 to n do
read A[i]
endfor
for i=1 to n-1 do
m:=n-i+1
p:=1
max:=A[1]
for j=2 to m
if (A[j]>max) then
p:=j
max:=A[j]
endif
endfor
t:=A[m]
A[m]:=A[p]
A[p]:=t
endfor
for i=1 to n do
print A[i]
endfor
end ord_sel

Ultima modifica di gd020188 : 22-11-2008 alle 12:35.
gd020188 è offline   Rispondi citando il messaggio o parte di esso
Old 22-11-2008, 09:14   #2
cionci
Senior Member
 
L'Avatar di cionci
 
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
Prima cosa indenta il codice che hai scritto ed inserisci all'interno del tag CODE del forum.
Altrimenti diventa arduo capirci qualcosa
cionci è offline   Rispondi citando il messaggio o parte di esso
Old 22-11-2008, 11:08   #3
gugoXX
Senior Member
 
L'Avatar di gugoXX
 
Iscritto dal: May 2004
Città: Londra (Torino)
Messaggi: 3692
Per dire se un algoritmo e' giusto, si puo' inziare a provare con qualche test, poi possiamo leggere l'algoritmo e si cercano eventuali casi particolari non coperti.
__________________
Se pensi che il tuo codice sia troppo complesso da capire senza commenti, e' segno che molto probabilmente il tuo codice e' semplicemente mal scritto.
E se pensi di avere bisogno di un nuovo commento, significa che ti manca almeno un test.
gugoXX è offline   Rispondi citando il messaggio o parte di esso
Old 22-11-2008, 12:36   #4
gd020188
Junior Member
 
Iscritto dal: May 2008
Messaggi: 29
Ho messo il codice nel tag CODE.

Io ho provato a ordinare l'array 5-3-1-4-2 e l'array 6-1-4-2-5-3 e mi pare funzionare.
gd020188 è offline   Rispondi citando il messaggio o parte di esso
Old 22-11-2008, 12:45   #5
cionci
Senior Member
 
L'Avatar di cionci
 
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
Va bene metterlo nel tag code, ma se non indenti il codice non serve a niente
cionci è offline   Rispondi citando il messaggio o parte di esso
Old 22-11-2008, 13:33   #6
The_ouroboros
Senior Member
 
L'Avatar di The_ouroboros
 
Iscritto dal: May 2007
Città: Milano
Messaggi: 7103
http://linux.wku.edu/~lamonml/algor/sort/selection.html
__________________
Apple Watch Ultra + iPhone 15 Pro Max + Rog Ally + Legion Go
The_ouroboros è offline   Rispondi citando il messaggio o parte di esso
Old 22-11-2008, 13:48   #7
gd020188
Junior Member
 
Iscritto dal: May 2008
Messaggi: 29
Quote:
Originariamente inviato da cionci Guarda i messaggi
Va bene metterlo nel tag code, ma se non indenti il codice non serve a niente
Che cosa significa "indentare il codice"?
gd020188 è offline   Rispondi citando il messaggio o parte di esso
Old 22-11-2008, 13:49   #8
gd020188
Junior Member
 
Iscritto dal: May 2008
Messaggi: 29
Quote:
Originariamente inviato da The_ouroboros Guarda i messaggi
Perdonami ma non riesco a capire se il mio è buono confrontandolo con quello perché non so come tradurre l'uno nell'altro.
gd020188 è offline   Rispondi citando il messaggio o parte di esso
Old 23-11-2008, 10:47   #9
Alex_87_xelA
Senior Member
 
Iscritto dal: Nov 2008
Messaggi: 530
Codice:
const int nmax=100;			// numero max di elementi
typedef int Vettore [nmax];	      // dichiarazione del tipo Vettore

// Funzione per la ricerca del minimo in un sottoelenco
void MinimoSottoelenco(const Vettore SubV, const int k, const int n, int & min, int & p) 
{
	min=SubV[k];
	p=k;

	for(int i=k+1;i<n;i++) {
		if (min > SubV[i]) {
			min=SubV[i];
			p=i;
		}
	}
}

// Funzione di ordinamento per selezione
void SelectionSort(Vettore & Elenco, const int n) 
{
	int p;
	int min;

	for(int k=0;k<n-1;k++) {
		MinimoSottoelenco(Elenco,k,n,min,p);
		Elenco[p]=Elenco[k];
		Elenco[k]=min;
	}
}
Alex_87_xelA è offline   Rispondi citando il messaggio o parte di esso
Old 23-11-2008, 10:59   #10
cionci
Senior Member
 
L'Avatar di cionci
 
Iscritto dal: Apr 2000
Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29
Messaggi: 53971
Quote:
Originariamente inviato da gd020188 Guarda i messaggi
Perdonami ma non riesco a capire se il mio è buono confrontandolo con quello perché non so come tradurre l'uno nell'altro.
http://it.wikipedia.org/wiki/Indentazione
cionci è offline   Rispondi citando il messaggio o parte di esso
Old 23-11-2008, 14:10   #11
malocchio
Senior Member
 
L'Avatar di malocchio
 
Iscritto dal: Feb 2007
Città: Verona
Messaggi: 1060
Codice:
begin ord_sel
	var : A[10] : array of real
	var : t,max : real
	var : i,j,m,n,p : integer
	read n
	for i=1 to n do
		read A[i]
	endfor
	for i=1 to n-1 do
		m:=n-i+1
		p:=1
		max:=A[1]
		for j=2 to m
			if (A[j]>max) then
				p:=j
				max:=A[j]
			endif
		endfor
		t:=A[m]
		A[m]:=A[p]
		A[p]:=t
	endfor
	for i=1 to n do
		print A[i]
	endfor
end ord_sel
L'ho letto attentamente e secondo me funziona.
__________________
malocchio è offline   Rispondi citando il messaggio o parte di esso
Old 26-11-2008, 01:35   #12
gd020188
Junior Member
 
Iscritto dal: May 2008
Messaggi: 29
Grazie a tutti. La prossima volta indenterò il codice personalmente: mi scuso per la mia mancanza.
gd020188 è offline   Rispondi citando il messaggio o parte di esso
 Rispondi


Dark Perk Ergo e Sym provati tra wireless, software via browser e peso ridotto Dark Perk Ergo e Sym provati tra wireless, softw...
DJI RS 5: stabilizzazione e tracking intelligente per ogni videomaker DJI RS 5: stabilizzazione e tracking intelligent...
AMD Ryzen 7 9850X3D: Zen 5, 3D V-Cache e frequenze al top per il gaming AMD Ryzen 7 9850X3D: Zen 5, 3D V-Cache e frequen...
Le soluzioni FSP per il 2026: potenza e IA al centro Le soluzioni FSP per il 2026: potenza e IA al ce...
AWS annuncia European Sovereign Cloud, il cloud sovrano per convincere l'Europa AWS annuncia European Sovereign Cloud, il cloud ...
Buone notizie per l'Osservatorio Paranal...
Nintendo Switch è diventata la co...
SplitHYPE: come funziona il nuovo strume...
Questo robot aspirapolvere top di gamma ...
Non solo fisica delle particelle: il Lar...
Samsung Galaxy S26 Ultra si mostra in un...
DJI Neo a soli 149€ su Amazon: il mini d...
I futuri chip di Apple, Qualcomm e Media...
Problema per il secondo stadio di un raz...
OnlyFans cambia proprietà? Avviat...
OnePlus estende il supporto alla ricaric...
Non solo Fold: Apple sta valutando la re...
TSMC deve raddoppiare la sua capacit&agr...
Raspberry Pi ritocca ancora i prezzi: la...
Missione Artemis II: lancio rinviato a m...
Chromium
GPU-Z
OCCT
LibreOffice Portable
Opera One Portable
Opera One 106
CCleaner Portable
CCleaner Standard
Cpu-Z
Driver NVIDIA GeForce 546.65 WHQL
SmartFTP
Trillian
Google Chrome Portable
Google Chrome 120
VirtualBox
Tutti gli articoli Tutte le news Tutti i download

Strumenti

Regole
Non Puoi aprire nuove discussioni
Non Puoi rispondere ai messaggi
Non Puoi allegare file
Non Puoi modificare i tuoi messaggi

Il codice vB è On
Le Faccine sono On
Il codice [IMG] è On
Il codice HTML è Off
Vai al Forum


Tutti gli orari sono GMT +1. Ora sono le: 10:23.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Served by www3v