Quote:
Originariamente inviato da Argosoft
delay(millisecondi);
esempio:
writeln('ciao!');
delay(1000);
writeln('è passato un secondo dall'ultima volta che ti ho salutato!  ');
devi mettere Crt su uses per poter usare il delay
ciauz!
|
Questo è il programma che ho fatto... io cmq uso BORLAND PASCAL e nn TURBO PASCAL, nn c'entra niente?
cmq... il prog mandato in esecuzione mi da tutti i messaggi ma nn aspetta di
x secondi, capisci?
mi potresti fare un programma x intero come ho fatto io che aspetta dei secondi dati da tastiera oppure x secondi (costante)?
Grazie x l'aiuto.
Alberto.
program secondi;
uses wincrt;
var x:real;
procedure delay (x:real);
begin
end;
begin
writeln ('Ciao!');
writeln ('quanti secondi?');
readln (x);
delay (x);
writeln ('Sono passati 2 secondi da quando ti ho salutato');
end.
