Bài 7. Câu lênh lặp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Trương Đại Phong

viết chương trình tính tích của n số tự nhiên đầu tiên,với N số tự nhiên được nhập từ bàn phím(sử dụng câu lệnh While..Do

 

Nguyễn Lê Phước Thịnh
8 tháng 5 2021 lúc 20:29

uses crt;

var i,n:integer;

s:real;

begin

clrscr;

write('Nhap n='); readln(n);

s:=1;

i:=1;

while i<=n do 

  begin

s:=s*i;

i:=i+1;

end;

writeln(s:0:0);

readln;

end.


Các câu hỏi tương tự
Trịnh Nam
Xem chi tiết
Huỳnh Hân
Xem chi tiết
Hương Mai
Xem chi tiết
X No mame
Xem chi tiết
thanh mai
Xem chi tiết
Minh Ngọc
Xem chi tiết
Huy Nguyễn
Xem chi tiết
Minh Đông
Xem chi tiết
huy hoàng
Xem chi tiết