Nhập hai số nguyên dương k và n(k<n) tính C=k!*n!/(n-k)! .tính và sử dụng hàm tính x! M.n giúp mk với mk cảm ơn

uses crt; var n,k:longint; c:real; function gt(a:longint):longint; var i:longint; begin gt:=1; for i:=1 to a do gt:=gt*i; end; begin clrscr; write('Nhap k: ');readln(k); write('Nhap n: ');readln(n); c:=gt(k)*gt(n)/gt(n-k); writeln('C= ',c:0:5); readln end.

Nhập hai số nguyên dương k và n(k
15/07/2021 Bởi Charlie

Nhập hai số nguyên dương k và n(k { "@context": "https://schema.org", "@type": "QAPage", "mainEntity": { "@type": "Question", "name": " Nhập hai số nguyên dương k và n(kBình luận

Viết một bình luận Hủy