Bài 8. Lặp với số lần chưa biết trước

Violet Evergarden

Viết chương trình tính tích n.1.3.5.7. ... .n, n là số tự nhiên nhập từ bàn phím( Dùng While... do)

Mik rất rất cần gấp!!!

Thanks a lot :)

Minh Lệ
30 tháng 5 2020 lúc 11:21

Program HOC24;

var i,n: integer;

t: longint;

begin

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

t:=1; i:=1;

while i<n do

begin

if i mod 2=1 then t:=t*i;

i:=i+1;

end;

write(t);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
Thu Anh
Xem chi tiết
dũng
Xem chi tiết
phương thuý nguyễn thị
Xem chi tiết
Đào Tất Thắng
Xem chi tiết
Nhật Duy Lê Võ
Xem chi tiết
Thu Tuyền
Xem chi tiết
Thanh huyền
Xem chi tiết
Ngọc Tú
Xem chi tiết
trinhtrannamhoa
Xem chi tiết