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
Huệ anh •01•86

Cho dãy số 2;5;8;11;... Viết Chương trình yêu cầu nhập số nguyên N từ bàn phím tính tích E sau đó in kết quả ra màn hình E=2.5.8.11....n

Kiều Vũ Linh
17 tháng 3 2022 lúc 9:04

Var i,n:integer;

E:real;

Begin

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

E:=1;

For i:=2 to n do

Begin

E:=E*i;

i:=i+2;

End;

Write('E = ',E:15:0);

Readln;

End.


Các câu hỏi tương tự
Thư Uyên
Xem chi tiết
thanh mai
Xem chi tiết
nguyễn bảo nga
Xem chi tiết
Maiiii
Xem chi tiết
DinoDrang
Xem chi tiết
thanh mai
Xem chi tiết
Ngọc Nguyễn
Xem chi tiết
hoangvinh
Xem chi tiết
Bảo Trâm
Xem chi tiết