3U

Viết chương trình tính tích từ 1 đến 10 chiều mai mik thi cuối kì 1 r giúp mik nhá!

3U
29 tháng 12 2022 lúc 20:00

Đề thi cuối kì 1 đâyloading...  

Bình luận (0)
NT
30 tháng 12 2022 lúc 0:12

uses crt;

var i,s:longint;

begin

clrscr;

s:=1;

for i:=1 to 10 do

s:=s*i;

writeln(s);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
3U
Xem chi tiết
DN
Xem chi tiết
H24
Xem chi tiết
AM
Xem chi tiết
HL
Xem chi tiết
37
Xem chi tiết
BV
Xem chi tiết
XH
Xem chi tiết
NT
Xem chi tiết