Viết chương trình nhập vào từ bàn phím 1 số nguyên dương N,N<=100 và dãy A gồm N số nguyên A1A2...An a) In ra màn hình dãy vừa nhập b) Đếm số phần tử chia hết cho 3 ở trong dãy c) Tính tổng các phần tử lẻ trong dãy.

ttnn2142

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 9 xem

1 trả lời

Thích Trả lời

octiiu779

program Bai;

uses crt;

var A:array[1..100] of integer;

s,dem,i,n:integer;

begin

clrscr;

dem:=0;

s:=0;

write('Nhap n phan tu:'); readln(n);

for i:=1 to n do

begin

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

readln(A[i]);

for i:=1 to n do writeln(A[i]:3) {In dãy}

for i:=1 to n do

if A[i] mod 3=0 then inc(dem); { Đếm số phần tử chia hết cho 3}

writeln('So phan tu chia het cho 3 ',dem)

for i:=1 to n do

if A[i] mod 2<>0 then s:=s+A[i]; { Tổng phần tử số lẻ}

writeln('Tong cac phan tu le trong day la ',s);

readln

end.

Vote (0) Phản hồi (0) 2 năm trước

515300642725927

Program abi;

uses crt;

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

i,n: integer;

s: integer=0;

count:integer=0;

begin

clrscr;

writeln ('Nhap vao N : '); readln (n);

for i:=1 to n do begin write ('a[',i,'] = '); readln (a[i]); end;

for i:=1 to n do begin write (a[i],' '); if a[i] mod 3 = 0 then count:=count+1;if a[i] mod 2 <> 0 then s:=s+a[i] ;end;

writeln ('Co ',count,' phan tu trong day tren.');

writeln ('Tong cac phan tu le trong day : ', s);

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

mn giúp đc ko ạ! tìm x biết: x : 0,25 = 9 : x

Quy trình lựa chọn và sử dụng PP, KTDH cho một chủ đề (bài học) trong môn Khoa học tự nhiên ở THCS được giới thiệu trong Nội dung 3 có gì khác so với quy trình hiện nay quý thầy/cô đang thực hiện ở trường phổ thông?

1Vai trò của cơ trong việc tăng thể tích lồng ngực Giúp mình với mình đang cần gấp

- Tình bạn đẹp là cùng chia sẻ ngọt bùi giúp đỡ nhau khi khó khăn - Không nên thờ ơ trước khó khăn của người khác - Nếu chỉ nghĩ đến bản thân không biết đồng cảm yêu thương thì không có kết cục tốt đẹp Đặt câu có sử dụng dấu ngoặc kép và cho biết công dụng với thông điệp trên ( vs lại cô e có dặn là dùng lời đối thoại vs câu trê j j nx ạ, e ko nhớ rõ lắm ạ)

18. They have learned English for 4 years now. → They started.. 19. I spent 3 hours painting this picture. → It took me.. 20. Nam is more intelligent than his brother. →Nam's brother is not..... 21. My grandmother often wore Ao dai . → My grandmother used to... 25. Because Hoa was tired she went to bed early ......9 so....... 25-“My wife is very busy now, she 'll visit you tomorrow." Peter said to Liz. - Peter said that...

Tìm giá trị của a để 2x3-3x^2+x+a chia hết cho x+2

Vẽ 1 trong 2 pic dưới, không được thì vẽ hộ iem nhân vật bất kì trong Re: Zero Kara Hajimeru Isekai Seikatsu. Hóng 6/1

Cho tam giác ABC vuông tại A, đường cao AH. Vẽ đường tròn (O) đường kính BH, đường tròn này cắt AB ở D (khác B). Vẽ đường tròn (O') đường kính CH, đường tròn này cắt AC ở E (khác C) 1. Hai đường tròn (O) và (O') có vị trí như thế nào đối với nhau? Chứng minh 2. Tứ giác ADHE là hình gì? Vì sao? 3. Chứng minh DE là tiếp tuyến chung của đường tròn.

DJTan nhiều trong nuớc. Câu 13. Nhận định nào sau dây sai? . NaCOs (soda khan) được dùng trong công nghiệp tủy tinh, gồm sứ, bột giật CACO tinh khiết là chất bột, màu trắng, nhẹ, dược dùng làm chât dộn trong một số ngành công nghiệp Nal ICO; còn dược dùng trong công nghiệp thực phẩm. thuốc giảm dau dạ dày do du thừa avit. C. B. D. CO còn được dùng dể làm nhiên liệu khi. Câu 14. Chất nào sau dây không bị nhiệt phân tạo ra CO2 khi dun nóng? B. NaHCO C. CaCO D. NH&HCO A. NaCO Câu 15. Cập chất nào sau đây tác dụng với nhau tạo ra sản phẩm dều là chất khí? B. CO và CuO D. CO và KOH C.C và FeO A.C và H2O

5. The students clean this room everyday. → This room.. 6. The workers have just built a new bridge here → A new bridge... 7. I bought that schoolbag last year. → That schoolbag. . 8. Ba has finished these works before lunch. → These works... 9. We will do an English test next week. → An English test.. . 10. He is going to give his son a present. → His son. . 11. We must do the exercises carefully The exercises....

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến