2014/15 – Fase scolastica – 06

È dato il seguente programma:

Program E6 (input, output); 
Var 
   i, c: Integer; 
Begin 
   c:=0;
   i:=0; 
   While(i < 100) Do
      Begin 
         c:=c+1; 
         If(c mod 2 <> 0) Then 
            i:=i+1 
         Else 
            i:=i+c; 
      End; 
   Writeln('c=', c); 
End.

Cosa viene visualizzato a video dall’esecuzione del programma?

1. il ciclo while non termina mai, quindi non viene visualizzato nulla
2. c=19
3. c=18
4. c=17