Cho thuật toán:
Procedure Test(x,i,j: Integer);
Var m:integer;
Begin
m:=trunc(i+j)/2;
If x= a[i] then vt:=m
Else If (x<a[m]) and ( i<m) then Test(x,i,m-1)
Else If ( x> a[m] ) and (j>m) then Test(x,m+1,j)
Else vt:=0;
End;
Với A = {5, 2, 9 ,8, 6, 4, 7,1}. Kết quả nào đúng trong số những kết quả dưới đây:
D. Test(7,1,8), vt = 8;
A là đáp án đúng
Tìm các số nguyên không vượt quá 100 hoặc là bình phương hoặc là lập phương của một số nguyên?
Hãy liệt kê quan hệ R trên tập hợp {1,2,3,4,5} biết ma trận biểu diễn như sau:
Kết quả nào đúng trong số những kết quả dưới đây sau khi thực hiện thuật toán:
Function Test (n: Integer): Integer;
Var f1, f2, fn: Integer;
Begin
f1=1;
f2=1;
i:=3;
While i<=n do
Begin
fn := f1 + f2; f1:=f2; f2:=fn;
i:=i+1;
End;
Test:= fn;
End;