: Nhập N từ bàn phím (N>0), tính giai thừa của n (n!)

0 bình luận về “: Nhập N từ bàn phím (N>0), tính giai thừa của n (n!)”

1. program oken;

   uses crt;

   var n,gt,i:int64;

   begin

   write(‘nhap n: ‘): readln(n);

   gt:=1;

   for i:=1 to n do gt:=gt*i;

   writeln(‘N!=’,gt);

   readln;

   end.

   Bình luận