NA

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

NT
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ự
NA
Xem chi tiết
PV
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
MN
Xem chi tiết
H24
Xem chi tiết
HT
Xem chi tiết
HT
Xem chi tiết
DC
Xem chi tiết