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

VT

-Viết chương trình nhập 1 dãy số nguyên gồm n phần tử. in ra màn hình vị trí các phần tử có giá trị bằng x ( với x,n được nhập từ bàn phím)

 

NT
7 tháng 5 2021 lúc 21:02

uses crt;

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

i,n,x:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

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

for i:=1 to n do 

  if a[i]=x then write(i:4);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
HN
Xem chi tiết
HN
Xem chi tiết
HT
Xem chi tiết
PL
Xem chi tiết
H24
Xem chi tiết
DN
Xem chi tiết
DB
Xem chi tiết
TD
Xem chi tiết
AS
Xem chi tiết