*BÀI TẬP PASCAL: N ( N giai thừa ) được tính bằng công thức sau: N!= 1.2.3…N. Cho trước 1 số nguyên dương N (1≤N≤100.000). Yêu cầu: Tìm số chữ số 0

*BÀI TẬP PASCAL:
N ( N giai thừa ) được tính bằng công thức sau: N!= 1.2.3…N.
Cho trước 1 số nguyên dương N (1≤N≤100.000).
Yêu cầu: Tìm số chữ số 0 tận cùng của N!
Dữ liệu vào: Nhập số nguyên dương N từ bàn phím.
Kết quả: Thông báo kết quả tính được ra màn hình
MN GIÚP MÌNH VS
MÌNH ĐANG CẦN GẤP

0 bình luận về “*BÀI TẬP PASCAL: N ( N giai thừa ) được tính bằng công thức sau: N!= 1.2.3…N. Cho trước 1 số nguyên dương N (1≤N≤100.000). Yêu cầu: Tìm số chữ số 0”

  1. uses crt;
    var i,n,kq:longint;
        s:string;
    begin
            clrscr; 
            kq:=1;
            write(‘Nhap n: ‘); readln(n);
            for i:=1 to n do
                    kq:=kq*i;
            str(kq,s);
            for i:= length(s) downto 1 do
                    if s[i]=’0′ then
                            begin
                                    write(‘Vi tri so 0: ‘,i);
                                    break;
                            end;
            readln;
    end.

    Bình luận

Viết một bình luận