Bài 9. Làm việc với dãy số

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Ánh sao

Chương trình nhập vào số nguyên gồm 4 phần tử sau đó in ra màn hình tổng các phần tử có giá trị là số lẻ

Nguyễn Lê Phước Thịnh
1 tháng 4 2021 lúc 22:34

uses crt;

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

i,t:integer;

begin

clrscr;

for i:=1 to 4 do

 begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to 4 do 

  if a[i] mod 2<>0 then t:=t+a[i];

writeln(t);

readln;

end.


Các câu hỏi tương tự
Ánh sao
Xem chi tiết
Phương Linh
Xem chi tiết
Ánh sao
Xem chi tiết
Ánh sao
Xem chi tiết
Ánh sao
Xem chi tiết
Jeri James
Xem chi tiết
Ánh sao
Xem chi tiết
Hoàng Thị Vân
Xem chi tiết
Ánh sao
Xem chi tiết