Viết chương trình nhập vào từ bàn phím dãy số nguyên A có n phần tử và 1 số nguyên k. Sau đó in lên màn hình chỉ số i mà Ai= k hoặc thông báo không tìm thấy nếu không có số hạng nào của dãy số có giá trị = k

quangvinh

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 24 xem

1 trả lời

Thích Trả lời

195d140217065

program vi_tri_bang_k;

uses crt;

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

n,i,d:integer;

begin

clrscr;

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

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

d:=0;

for i:=1 to n do

begin

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

if A[i]=k then d:=d+1;

end;

if d=0 then write('Khong co so hang nao cua day co gia tri bang ',k)

else

begin

write('Co ',d,' vi tri: ');

for i:=1 to n do

if A[i]=k then write(i,' ');

end;

readln;

end.

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

phuongtrinh17112002

program pascal;

uses crt;

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

k,i,n:byte;

begin

clrscr;

writeln('nhap n =' );

readln(n);

for i:=1 to n do

begin

writeln('nhap phan tu thu ',i);

realn(a[i]):

end;

writeln('nhap k = ');

readln(k);

for i:=1 to n do

if A[i] = K then

writeln('chi so phan tu bang gia tri k la : ' , i) else

writeln('khong tim thay phan tu nao bang gia tri k');

readln

end.

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

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

ai đúng và nhanh nhất hay nhất cảm ơn

Đất mẹ là gì! Nhóm tuyển thành viên! Làm sao để chuyển chức phó nhóm vậy Trả lời hết những câu trện sẽ dc ctlhn+5sao+cám ơn nhé thanks mn

Hic😿 giúp e vs ạ:( Hứa vote uy tín

Cho tam giác ABC vuông tại A. có BD là tia phân giác của góc B [ D thuộc AC ] Từ D vẽ DE vuông góc Bc [E thuộc BC ] a/ CM tam giác ADB và tam giác EDB b/ DE kéo dài cắt tia BA tại K. Cm DK bằng DC và AE song song KC

tìm x, biết : (3x² - 2) 1 ---------- = --- 5 2

Giải hộ mình zới TvT $\frac{1}{2}$ `x`+150%`x`=2014

meo meo meo vẽ giùm em thành viên trong nhóm winx hoặc cả nhóm nhé(tô màu)

1 Thấu kính hội tụ có tiêu cự 10 cm, vặt AB cao 5 cm cách thấu kính 15 cm. a) Tính độ tụ D, khoảng cách ảnh đến thấu kính, độ phóng đại k, chiều cao và tính chất ảnh b) Để ảnh ảo gấp 3 lần vật thì phải đặt vật ở đâu VẼ HÌNH

- nguyên nhân thắng lợi của cuộc kháng chiến chống ngoại xâm cuối thế kỉ xviii - Đánh giá vai trò của Nguyễn Huệ (Quang Trung) đối với sự nghiệp thống nhất đất nước và các cuộc kháng chiến chống ngoại xâm. Mn giúp em với ạ, em cảm ơn!

Câu 8 làm sao vậy ạ Lẹ lẹ nha mng

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