Bài 1. Máy tính và chương trình trong máy tính

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Trần Công Tiến

Viết ct nhập dãy gồm n phần tử nguyen n>50 (n nhập từ bàn phím )

Tính tích các phần tử có chỉ số lẻ

Minh Lệ
30 tháng 3 2019 lúc 17:56

Lời giải :

program hotrotinhoc ;

var a: array[1..1000] of integer ;

n,T : integer ;

begin

write('nhap gia tri cua n:'); readln(n)

for i:= 51 to n do

begin

write('Nhap gia tri cua cac phan tu' ); readln(a[n]);

end;

for i:= 51 to n do

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

write('Tich la:',T);

readln

end.


Các câu hỏi tương tự
Rikka Takanashi
Xem chi tiết
Phạm Nguyễn Thanh Ngân
Xem chi tiết
Le Thi Nhung
Xem chi tiết
Lily Minamoto
Xem chi tiết
Nguyễn Thị Thu Hiền
Xem chi tiết
Cánh Cụt
Xem chi tiết
Thiên Thảo
Xem chi tiết
VĂN LƯƠNG NGỌC DUYÊN
Xem chi tiết
Hoàng Thiên Ly
Xem chi tiết