Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Ciao a tutti.
Sto seguendo la guida sul Pascal di questo sito, provando i codici per esercitarmi.
Nel capitolo 6, c'è questo codice:
Codice sorgente - presumibilmente Delphi
Program Esempio;
Uses Crt;
Var n:byte;
c:word;
begin
clrscr;
write(‘Inserisci un numero: ‘);
readln(n);
case n of
1:writeln(‘E’’ stato premuto il pulsante 1’);
2:begin
sound(440);
delay(1000);
nosound;
end;
3 or 4 or 5:write(‘Il numero premuto è fra 3 e 5’);
else
begin
c:=sqr(n);
writeln(c,’ è il quadrato di ‘,n);
end;
end;
readln
end.
ma quando lo eseguo e premo il 3, il 4 o il 5, invece di venir fuori la scritta "Il numero premuto è fra 3 e 5", mi calcola la radice. Come si può aggiustare? Grazie.