Lập trình đơn giản

Thái Nguyên Khuê

Viết chương trình tích tích từ 1 đến 10

Mn giúp mik vs ạ

Nguyễn Lê Phước Thịnh
24 tháng 4 2020 lúc 9:32

uses crt;

var s,i:int64;

begin

clrscr;

s:=1;

for i:=1 to 10 do

s:=s*i;

writeln('Tich cac so tu 1 toi 10 la: ',s);

readln;

end.x

Bình luận (0)

Các câu hỏi tương tự
Thành Đạt
Xem chi tiết
Nhân lê
Xem chi tiết
ytkc
Xem chi tiết
hilluu :>
Xem chi tiết
Trịnh Uyển Nhi
Xem chi tiết
Ma Phan Đức
Xem chi tiết
Nguyễn Ally
Xem chi tiết
Nguyễn Tiến Đạt 8/1
Xem chi tiết
Kim Thái
Xem chi tiết