2012/13 – Fasescolastica – 06

di

È 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-1;
      End;
   Writeln('c=', c);
End.

Cosa viene visualizzato a video dall’esecuzione del programma?

  1. c=100
  2. c=101
  3. c=199
  4. il ciclo while non termina mai, quindi non viene visualizzato nulla.