Giai thừa #1

View as PDF

Points: 100 (p) Time limit: 1.0s Memory limit: 256M Input: stdin Output: stdout

In ra tích các số từ 1 đến \(N\).

Input

  • Số nguyên \(N \leq 10\)

Output

  • Kết quả bài toán.

Example

Test 1
Input
3
Output
6
Test 2
Input
4
Output
24

Comments


  • 1
    nujomau6    8:14 p.m. 2 oct, 2024

    VAr n,i,S:longint;
    BEgin
    Readln(n);
    S:=1;
    for i:=1 to n do If i>0 then S:=S*i;Writeln(S);
    Readln
    End.(pascal)