È 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?
- il ciclo while non termina mai, quindi non viene visualizzato nulla
- c=19
- c=18
- c=17