2003/04 – Fase scolastica – 04

Si consideri la seguente funzione conta() che prende in input un vettore di numeri di lunghezza n (assumendo che n sia compreso fra 2 e 100):

Type
   sequenza = Array[1..100] Of Integer;
 
Function conta(vett: sequenza; n: Integer): Integer;
Var
   i, j, k: Integer;
Begin
   i:=0;
   k:=0;
   j:=1;
   For i:=1 To n-1 Do
      If(vett[i] < vett[i+1]) Then
         j := j+1
      Else
         Begin
            If(k < j) Then
               k:=j;
            j:=1;
         End;
   conta:=k
End;

Quale delle seguenti affermazioni è vera?

Risposte:

1. la funzione restituisce il numero di interi presenti nel vettore
2. la funzione restituisce il massimo valore presente nel vettore
3. la funzione restituisce la lunghezza della più lunga sottosequenza ordinata (in modo strettamente crescente) all'interno del vettore
4. nessuna delle precedenti affermazioni è vera.