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ài 6. Câu lệnh điều kiện
Các câu hỏi tương tự
Viết chương trình tính tổng n số nguyên tố đầu tiên với n nhập từ bàn phím
viết chương trình nhập giá trị n. tính tổng các số từ 1-10
Viết chương trình tính tổng sau:A= 1+1/3+1/5+⋯+1/n (với n nhập từ bàn phím) *
Viết chương trình thông báo nhập cân nặng (w) và chiều cao (h) của một học sinh. Tính toán và thông báo ra màn hình chỉ số khối của cơ thể BMI, biết BMI=w/(h.h). Kiểm tra và thông báo ra màn hình một trong các kết quả sau: nếu BMI ≥ 25 : thừa cân; Nếu BMI ≥18,5 và BMI < 25: bình thường; Nếu BMI < 18,5 : suy dinh dưỡng. *
Viết chương trình tính tích P=1x2x3x..xn
Câu1 viết chương trình nhập giá trị n từ ban phím in các số chẵn từ 1 đến n Câu2 viết chương trình in ra màn hình các số chẵn đầu tiên với chẵn nhỏ nhất >1000 Lm ơn tui sắp kiểm tra r
AI GIÚP MIK BÀI NÀY VS
1) viết chương trình tính tổng 100 số tự nhiên đầu tiên
2. viết chương trình kiểm tra số n nhập từ bàn phím có chia hết cho hai số 2 và 3 không. nếu có thì in ra dòng chữ chia hết và không chia hết
Anh (Chị) hãy sử dụng vòng lặp For, While, Do...While để viết chương trình tính N! với từng loại vòng lặp và in kết quả của theo từng loại vòng lặp
nhập vòa số nguyên n viết chương trình in ra màn hình tổng các ước của n