Ciao a tutti mi chiamo Alex e frequento l'ITIS ed ho un problema con un programma pascal che non riesco a risolvere.Ci ho pensato tanto ma sto prog non vuole andare. Il quesito è questo:
Dati tre concorrenti ed i tempi impiegati per portare a termine una gara,visualizzare il nome del vincitore.
Help!
Abbiamo tre concorrenti A, B, C. Se non usi le matrici puoi utilizzare le seguenti variabili.
concorrente A : A per inserire il nome, At per inserire il tempo
concorrente B : B per inserire il nome, Bt per inserire il tempo
concorrente C : C per inserire il nome, Ct per inserire il tempo
basta controllare le variabili del tempo, ovviamente il primo avrà impiegato meno tempo degli altri.
Program vincitore;
var
a,b,c:string[20];
at,bt,ct:real;
begin
(*inseriamo tutti i dati che ci servono*)
writeln('inserisci il nome del concorrente A');
readln(a);
writeln('inserisci il tempo impiegato dal concorrente A');
readln(at);
writeln('inserisci il nome del concorrente B');
readln(b);
writeln('inserisci il tempo impiegato dal concorrente B');
readln(bt);
writeln('inserisci il nome del concorrente C');
readln(c);
writeln('inserisci il tempo impiegato dal concorrente C');
readln(ct);
(* soluzione del quesito*)
if (at<bt) and (at<ct) then
writeln('Il vincitore è ',A);
if (bt<at) and (bt<ct) then
writeln('Il vincitore è ',B);
if (ct<at) and (ct<bt) then
writeln('Il vincitore è ',C);
end.
Questo listato ovviamente si può ottimizzare in base allo scopo da raggiungere ed utilizzando cicli e/o matrici, vettori.
In questo modo dovrebbe esserti chiaro come va risolto il problema.
P.S.: credi di + in te stesso, non era difficile e con un po' di impegno saresti riuscito a risolverlo. Ciao