Cicli in Pascal

Come realizzare un ciclo in Pascal? Ci sono tre modi differenti:

• • While (resta nel ciclo finché la condizione è vera)

  • For (esegue un conteggio)

  • Repeat Until (resta nel ciclo finché la condizione è falsa)

Esempio While

program prova;

uses

crt;

var

i: integer;

begin

i:=0;

while (i<10) do begin

i:=i+1;

writeln('Il contatore vale: ', i*6);

end;

readln();

end.

Esempio For

program prova; // Stampa i primi 5 numeri ogni mezzo secondo

uses crt;

var i: integer;

begin

readkey(); // Premi un tasto per andare avanti

for i := 1 to 5 do

begin

writeln(i);

delay(500);

end;

writeln('Premi un tasto per finire');

readkey(); // Premi un tasto per andare avanti

end.