Bài 11: Kiểu mảng

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyen Le
Viết chương trình nhập vào một dãy số n nhỏ hơn hoặc bằng 255 nhập vào một số nguyên k cho biết có k trong dãy số vừa nhập 20 ngược lại đưa ra câu thông báo không có k trong dãy số
Nguyễn Lê Phước Thịnh
19 tháng 1 2021 lúc 13:22

uses crt;

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

i,n,k,kt:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

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

kt:=0;

for i:=1 to n do 

if a[i]=k then kt:=1;

if kt=0 then writeln(k,' khong co trong day')

else writeln(k,' co trong day');

readln;

end.

Bùi Anh Tuấn
19 tháng 1 2021 lúc 20:11

\(\dfrac{s}{13}=\dfrac{2s}{3-vn}+\dfrac{2s}{3+vn}\)

\(\dfrac{s}{13}=\dfrac{2s\left(3+vn\right)+2s\left(3-vn\right)}{9-vn^2}\)

\(\dfrac{s}{13}=\dfrac{12s}{9-vn^2}\)

\(s\left(9-vn^2\right)=12s\cdot13\)

\(s\left(9-vn^2\right)=156s\)

\(9-vn^2=156\)

\(vn^2=-147\)


Các câu hỏi tương tự
Nguyễn Phú Trọng
Xem chi tiết
Anh Lê duy
Xem chi tiết
Anh Lê duy
Xem chi tiết
Anh Lê duy
Xem chi tiết
Anh Thư
Xem chi tiết
Nguyen Nhi
Xem chi tiết
Thảo Nguyên Ngô
Xem chi tiết
Anh Lê duy
Xem chi tiết
fyujg
Xem chi tiết