Hãy viết chương trình nhập từ bàn phím 1 dãy số nguyên gồm n số hạng n nhỏ hơn hoặc bằng 350 a) In ra dãy vừa nhập và tính tổng các phần tử trong dãy b) cho biết trong dãy là bao nhiêu số hạng là số nguyên âm và đưa kết quả ra màn hình c) tính tổng các số chẵn d) Nhập vào số ng

vnteam333

1 năm trước

Hãy viết chương trình nhập từ bàn phím 1 dãy số nguyên gồm n số hạng n nhỏ hơn hoặc bằng 350 a) In ra dãy vừa nhập và tính tổng các phần tử trong dãy b) cho biết trong dãy là bao nhiêu số hạng là số nguyên âm và đưa kết quả ra màn hình c) tính tổng các số chẵn d) Nhập vào số nguyên x đưa ra lượng các phần tử bằng x giúp mk với ạ :(((((((((((((((

Loga Sinh Học lớp 12

0 lượt thích 34 xem

1 trả lời

Thích Trả lời

tiendatlk17

uses crt;

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

n,i,s,dem,sch,x,demx:integer;

begin

clrscr;

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

write('Nhap x: '); readln(x);

s:=0; dem:=0; sch:=0; demx:=0;

for i:=1 to n do

begin

write('Nhap phan tu thu ',i,': ');

readln(A[i]);

s:=s+A[i];

if A[i]<0 then inc(dem);

if A[i] mod 2 = 0 then sch:=sch+A[i];

if A[i] = x then inc(demx);

end;

for i:=1 to n do write(A[i]:4);

writeln;

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

writeln('Co ',dem,' so hang la so nguyen am');

writeln('Tong cac so chan la: ',sch);

writeln('So luong cac phan tu bang ',x,': ',demx);

readln

end.

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

2575416259393758

uses crt;
var a: array[1..400] of integer;
n,s,x: integer;
i,csa,csx:byte;
begin
Write('So so hang trong day: '); readln(n);
for i:=1 to n do
begin
write('a[',i,']:');
readln(a[i]);
end;
write('Ban vua nhap: ');
for i:=1 to n do write(a[i],' ');
writeln;
csa:=0;
for i:=1 to n do
if a[i]<0 then csa:=csa+1;
write('So cac so am: ',csa);
writeln;
s:=0;
for i:=1 to n do
if a[i] mod 2 =0 then s:=s+a[i];
write('Tong cac so chan: ',s);
writeln;
write('Nhap x: '); readln(x);
csx:=0;
for i:=1 to n do
if a[i]=x then csx:=csx+1;
write('Cac phan tu bang x: ',csx);
readln;
end.

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

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

Nêu ví dụ về quyền bất khả xâm phạm về chỗ ở của công dân MÌNH CẦN GẤP Ạ .CẢM ƠN😄

Cho tam giác ABC có góc A = 80 độ góc B bằng 40 độ tia phân giác của góc c cắt AB tại d tính góc ACB và góc ADC

Bài 5: Cho tam giác ABC vuông tại A. Trên tia đối của tia AB lấy điểm K sao cho BK = BC. vẽ KH vuông góc với BC tại H và cắt AC tại E. a/ Vẽ hình và ghi GT - KL? b. KH=AC c. BE là tia phân giác của góc ABC d. AE< EC Bài 6: Cho Tam giác ABC cân tại A, hai trung tuyến BM, CN cắt nhau tại K. Chứng minh : a) tam giác BNC= tam giác CMB b. BKC cân tại K c. MN // BC Bài 7: Cho tam giác ABC cân tại A. Gọi M là trung điểm của AC. Trên tia đối của tia MB lấy điểm D sao cho DM = BM a. Chứng minh tam giác BMC = tam giác DMA. Suy ra AD // BC. b. Chứng minh Tam giác ACD là tam giác cân. c. Trên tia đối của tia CA lấy điểm E sao cho CA=CE. Chứng minh DC đi qua trung điểm I của BE. Bài 8: Cho tam giác ABC cân tại A, đường cao AH. Biết AB = 10cm, BC = 12cm. a) Chứng minh tam giác ABH bằng tam giác ACH. b) Tính độ dài đoạn thẳng AH. c) Gọi G là trọng tâm của tam giác ABC. Chứng minh ba điểm A, G, H thẳng hàng. Làm hết giúp mik nhé mik vote 5 sao cho

Phân tích nhân vật thị trong tác phẩm "Vợ nhặt"

cho S = 1/5 mũ 2+ 1/6 mũ 2+........+1/2020 mũ 2

tam giác abc có ac>ab so sánh góc ngoài tại các đỉnh bc

Câu 11: (NB) Quá trình lọc máu có diễn ra ở đâu và tạo thành sản phẩm nào? A. Ở cầu thận và tạo ra nước tiểu đầu B. Ở ống thận và tạo nước tiểu chính thức. C. Ở ống thận và nước tiểu đầu. D. Ở cầu thận và tạo ra nước tiểu chính thức. Câu 12: (NB) Sự tạo thành nước tiểu có đặc điểm là: A. Diễn ra liên tục. B. Diễn ra gián đoạn. C. Tùy từng thời điểm có thể liên tục hoặc gián đoạn. D. Diễn ra khi trao đổi chất quá nhiều. Câu 13: (NB) Sự thải nước tiểu có đặc điểm: A. Diễn ra liên tục. B. Diễn ra gián đoạn. C. Tùy từng thời điểm có thể liên tục hoặc gián đoạn. D. Diễn ra vào những lúc nhất định. Câu 14: (NB) Giai đoạn hấp thụ lại các chất dinh dưỡng, nước và các ion cần thiết của quá trình tạo nước tiểu xảy ra ở đâu ? A. Ống dẫn nước tiểu. B. Màng cầu thận. C. Bàng quang. D. Ống thận. Câu 15: (VDT) Khi cầu thận bị viêm và suy thoái thì hậu quả gì sẽ xảy ra ? A. Quá trình lọc máu bị trì trệ dẫn đến cơ thể bị nhiễm độc B. Ống thận bị tổn thương và nước tiểu hoà vào máu. C. Quá trình hấp thụ lại và bài tiết kém. D. Gây bí tiểu Câu 16: (NB) Nước tiểu chính thức được đổ vào A. Bóng đái B. Ống dẫn nước tiểu C. Ống đái D. Bể thận Câu 17: (NB) Nước tiểu đầu được hình thành do quá trình lọc máu diễn ra ở đâu? A. Cầu thận B. Nang cầu thận C. Bể thận D. Ống thận Câu 18: (TH) Nếu như trong nước tiểu chính thức có xuất hiện glucozo thì người này sẽ bị bệnh gì? A. Dư insulin C. Sỏi thận B. Đái tháo đường D. Sỏi bóng đái Câu 19: (VDC) Chất hòa tan được lọc qua cầu thận và được tái hấp thu hoàn toàn là: A. Glucozơ C. Protein B. Nước D. Creatin Câu 20: (NB) Việc thoát nước tiểu ra ngoài là nhờ hoạt động của : A. Cơ vân ống đái, cơ bóng đái và cơ bụng B. Cơ vòng ống đái, cơ bóng đái và cơ bụng C. Cơ trơn ống đái, cơ bóng đái và cơ bụng D. Cơ vân và cơ vòng ống đái, cơ bóng đái và cơ bụng

cho tam giác ABC , D là trung điểm cạnh BC trên tia đối của tia DA lấy điểm E sao cho DE= DA chứng minh rằng a . tam giác ABD bằng tam giác ADC b .AB song song với CE c .góc ABE = góc ECA

Viết đoạn văn 200 chữ sn về Ý nghĩa của việc sống hiện sinh đối với con người trong cuộc sống hôm nay. Cần gấp ạ

Viết chương trình nhập vào số x thực từ bàn phím. gán giá trị y là 10.5. Xuất ra màn hình tích x*y

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