*Công nhận là mình đọc xong đề mình cũng chịu 😅 không hiểu 😥
*nhưng dựa vào ví dụ thì có vẻ là kết quả in ra là giai thừa của n-1 🤔
var f1,f2:text;
i,n:byte;
t:longint;
const fi='Tritangle.inp';
fo='Tritangle.out';
function gt(n:byte):longint;
var tam:longint;
i:byte;
begin
t:=1;
for i:=2 to n do
t:=t*i;
exit(t);
end;
begin
assign(f1,fi);reset(f1);
assign(f2,fo);rewrite(f2);
readln(f1,t);
for i:=1 to t do
begin
readln(f1,n);
writeln(f2,gt(n-1));
end;
close(f1);close(f2);
end.