Nguyễn Thanh Anh

Bài 1: Viết chương trình Pascal nhập số từ bàn phím. Xuất ra màn hình:

+ Tính n!

+ Nhập số x từ bàn phím.Tính nx

Nguyễn Lê Phước Thịnh
16 tháng 12 2022 lúc 14:33

uses crt;

var n,x,i,lt,gt:int64;

begin

clrscr;

readln(n);

gt:=1;

for i:=1 to n do gt:=gt*i;

writeln(gt);

readln(x);

lt:=1;

for i:=1 to x do 

lt:=lt*n;

writeln(lt);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Nguyễn Thanh Anh
Xem chi tiết
PC Vũ
Xem chi tiết
crazy
Xem chi tiết
KenShi
Xem chi tiết
Minh Ngọc
Xem chi tiết
foxbi
Xem chi tiết
Ha Tran
Xem chi tiết
Ha Tran
Xem chi tiết
Đoàn Khánh Chi
Xem chi tiết