Những câu hỏi liên quan
BH
Xem chi tiết
PG
3 tháng 8 2023 lúc 20:53

program TinhTongGiaiThua;

uses crt;

var

     n, num, sum, digitCount: integer;

function GiaiThua(x: integer): integer;

var

     i, fact: integer;

begin

     fact := 1;

     for i := 1 to x do

     begin

          fact := fact * i;

     end;

     GiaiThua := fact;

end;

begin

     clrscr;

     write('Nhap so n: ');

     readln(n);

     sum := 0;

     digitCount := 0;

     while n > 0 do

     begin

          num := n mod 10;

          sum := sum + GiaiThua(num);

          digitCount := digitCount + 1;

          n := n div 10;

     end;

     writeln('Tong giai thua cac chu so cua n la: ', sum);

     writeln('Tong so chu so cua n la: ', digitCount);

     readln;

end.

Bình luận (0)
0A
Xem chi tiết
NH
Xem chi tiết
NT
3 tháng 1 2023 lúc 14:34

#include <bits/stdc++.h>

using namespace std;

long long n,i,s=1;

int main()

{

cin>>n;

for (int i=1; i<=n; i++) 

s=s*i;

cout<<s;

}

Bình luận (0)
H24
Xem chi tiết
MA
Xem chi tiết
PP
Xem chi tiết
VA
13 tháng 6 2023 lúc 15:15

c++:

#include <iostream>

using namespace std;

int main(){

int y;

cin >> y;

int i = 1;

int luythua = 1;

while(i<=y){

luythua = luythua *i;

i = i+1;

}

cout << luythua;

}

Bình luận (0)
NK
Xem chi tiết
NL
Xem chi tiết
NT
10 tháng 12 2019 lúc 17:28

uses crt;

var n,i:integer;

gt:longint;

begin

clrscr;

write('n='); readln(n);

gt:=1;

for i:=1 to n do

gt:=gt*i;

writeln(n,'!=',gt);

readln;

end.

Bình luận (0)
 Khách vãng lai đã xóa
NT
Xem chi tiết
TH
22 tháng 1 2018 lúc 13:15

uses crt;

var S,N,i:longint;

begin

clrscr;

writeln('Nhap so N=');readln(N);

S:=1;

for i:=1 to N do S:=S*N;

writeln('N!=',S);

readln

end.

Bình luận (0)
DB
21 tháng 1 2018 lúc 17:04

program Tinh_Giai_Thua;

uses crt;

longint S,N,i:longint;

begin

clrscr;

writeln('Nhap so N=');readln(N);

S:=1;

for i:=1 to N do S:=S*N;

writeln(N,'!=',S);

readln

end.

Bình luận (0)