2, viết ct nhập một dãy số nguyên gồm N phần tử (N<=1000) và một số nguyên k. Tìm trong dãy số nguyên có phần tử có giá trị bằng k hay không , nếu có thì đưa ra màn hình vị trí của phần tử đầu tiên/cuối cùng và đếm xem có bao nhiêu phần tử bằng k or thông báo ko có chú ý: phần t

tamtrang2594

2 năm trước

2, viết ct nhập một dãy số nguyên gồm N phần tử (N<=1000) và một số nguyên k. Tìm trong dãy số nguyên có phần tử có giá trị bằng k hay không , nếu có thì đưa ra màn hình vị trí của phần tử đầu tiên/cuối cùng và đếm xem có bao nhiêu phần tử bằng k or thông báo ko có chú ý: phần tử đầu tiên/phần tử cuối cùng(2 đề nha mn, thay ở chỗ nào nói em vs ạ. giúp em, em cần gấp lắm ạ!!!!!!)

Loga Sinh Học lớp 12

0 lượt thích 48 xem

1 trả lời

Thích Trả lời

tuesday

Dòng thứ 19 thay b[1] thành b[m]

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

huekimlove82

*Phần tử đầu:

uses crt;
var i,n,d,k,kq:longint; a:array[1..1000]of longint;
begin
clrscr;
write('Nhap n,k: ');readln(n,k);
for i:=1 to n do
begin
write('a[',i,']=');readln(a[i]);
if k=a[i] then inc(d);
if (k=a[i])and(d=1) then kq:=i;
end;
if d<>0 then
begin
writeln('Phan tu dau: ',kq);
writeln('So luong: ',d);
end else writeln('Khong co');
readln
end.

*Phần tử cuối:

uses crt;
var i,n,d,k,kq:longint; a:array[1..1000]of longint;
begin
clrscr;
write('Nhap n,k: ');readln(n,k);
for i:=1 to n do
begin
write('a[',i,']=');readln(a[i]);
if k=a[i] then begin inc(d); kq:=i; end;
end;
if d<>0 then
begin
writeln('Phan tu cuoi: ',kq);
writeln('So luong: ',d);
end else writeln('Khong co');
readln
end.

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

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

Nhà văn Ê-ren-bua nói : dòng suối đổ vào sông, sông đổ vào đại trường giang Vôn-gan, con sông Vôn-ga đi ra biển. Lòng yêu nhà, yêu làng xóm, yêu miền quê trở nên lòng yêu Tổ quốc ” viết đoạn văn về câu nói trên. (nói về lòng yêu nước á)

Phân biệt điểm khác nhau giữa đồ dùng ở góc học tập và dụng cụ học tập?

giải phương trình x+1/2020 + x+3/2018x+5/2016 + x+7/2014 + x+9/2012 + x+11/2010

*Mong mn giúp vs ạ *hình phía dưới và có j thiếu mn vẽ thêm vào cho e vs ạ Cho đường tròn (O ; R) đường kính MN. Vẽ dây cung AB=R, MA và NB kéo dài cắt nhau tại E a) tính số đo cung ab nhỏ và góc MEN b) gọi H là giao điểm của MB và NA. chứng minh tứ giác EAHB nội tiếp c) chứng minh MH×MB+NH×NA=4R^2

một cần cẩu mỗi lần nâng một công ten nơ 10 tấn lên 10 mét mất 30 giây. tính công suất cần cẩu

Phương thức biểu đạt chính của đoạn trích Chỉ ra tác dụng của phép liệt kê Taik sao tác giả cho rằng chúng ta không nên chần chờ thêm nữa

Cho mình hỏi làm sao để biết chất nào đó có tính oxh hoặc khử hoặc vừa oxh vừa khử?

chung minh rang neu khi ta con tre ta ko chiu kho hoc tap thi lon len se chang lam dc vc j co ich

Mỗi khí hidro cacbon A có công thức khái quát CnH2n biết khối lượng mol của A có tỉ khối so với H2 là 16 hãy xác định công thức A

Em không biết là 2 bài này. Giúp em với ạ

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