Function tinh(a: byte): Integer;

Var  i: byte; tam: word;

Begin

       Tam:=1;

        For i:= 1 to a do

        Tam:=tam* i;

        Tinh:= tam;

End;

Kết quả trả về của hàm thuộc kiểu dữ liệu nào?

Suy nghĩ và trả lời câu hỏi trước khi xem đáp án

ADSENSE
ADMICRO
YOMEDIA
ZUNIA9