Ví dụ 6: Nhập số nguyên N. Tính N giai thừa. Help vs ạ :<
2 câu trả lời
program N_giai_thua;
uses crt;
var N, i: integer;
Ngt: int64;
Begin
clrscr;
Ngt:= 1;
Writeln('Nhap N'); Readln(N);
For i:=N downto 1 do Ngt:=Ngt*i;
Writeln('giai thua cua N la', Ngt);
readln;
end.
`\text{program Nhap_so_N;}`
`\text{uses crt;}`
`\text{var n: integer;}`
`\text{begin}`
`\text{clrscr;}`
`\text{writeln('Nhap so nguyen'); readln(n);}`
`\text{readln}`
`\text{end.}`
`\text{CHÚC BẠN HỌC TỐT!}`
Câu hỏi trong lớp
Xem thêm