È 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*i; End; Writeln('c=', c); End.
Cosa viene visualizzato a video dall’esecuzione del programma ?
- il ciclo while non termina mai, quindi non viene visualizzato nulla
- c=9
- c=11
- c=8.