Cho dãy số nguyên A gồm n phần tử và 1 số nguyên k. Tìm trong A có phần tử nào bằng k hay không?
Viết chương trình 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 và đếm xem có bao nhiêu phần tử bằng k hoặc thông báo không có.
uses crt;
var a:array[1..1000]of integer;
i,n,k,dem: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);
for i:=1 to n do
if a[i]=k then
begin
writeln(i);
break;
end;
dem:=0;
for i:=1 to n do
if a[i]=k then inc(dem);
if dem>0 then writeln('Co ',dem,' phan tu bang ',k)
else writeln('Khong co phan tu nao bang ',k);
readln;
end.
Python:1. Cho dãy số nguyên A gồm M phần tử. Hãy lập trình nhập vào dãy số A, tìm xem có hay không phần tử có giá trị bằng K, nếu có thông báo ra vị trí bé nhất của phần tử đó. Với K được nhập vào từ bàn phím.
vi du: input
5 2
3 5 2 8 2
output
CO K O VI TRI 3
Cho dãy A gồm N số nguyên có giá trị a1, a2, …,an và 1 số nguyên k. Hãy đếm xem trong dãy A có bao nhiêu phần tử bằng k
program Tin_hoc;
Uses crt;
var i,n,k,dem:integer;
a;array[1..10000] of integer;
Begin
clrscr;
write('Nhap n: ');readln(n);
writeln('Nhap ',n,' pha tu cua day A:');
for i:= 1 to n do readln(a[i]);
dem:=0;
write('Nhap k: ');readln(k);
for i:= 1 to n do if a[i] = k then inc(dem);
writeln('Day A co ',dem,' ki tu ',k,);
readln;
end.
Bài toán. Cho dãy số gồm N phần tử là các số nguyên A1, A2,..., AN; số nguyên k. Hãy viết thuật toán tìm số k có trong dãy đã cho hay không? Nếu tìm thấy thì thoát và thông báo chỉ số i mà có Ai = k, nếu tìm thấy thì thông báo là không có số k trong dãy. (Lưu ý thực hiện đầy đủ 3 quy trình: 1. Xác định bài toán 2. Nêu ý tưởng (nếu trình bày được quá trình giải toán càng tốt sẽ được cộng thêm điểm) 3. Viết thuật toán (có thể dùng liệt kê hoặc vẽ sơ đồ khối)
Bài toán. Cho dãy số gồm N phần tử là các số nguyên A1, A2,..., AN; số nguyên k. Hãy viết thuật toán tìm số k có trong dãy đã cho hay không? Nếu tìm thấy thì thoát và thông báo chỉ số i mà có Ai = k, nếu tìm thấy thì thông báo là không có số k trong dãy.
(Lưu ý thực hiện đầy đủ 3 quy trình:
1. Xác định bài toán
2. Nêu ý tưởng (nếu trình bày được quá trình giải toán càng tốt sẽ được cộng thêm điểm)
3. Viết thuật toán (có thể dùng liệt kê hoặc vẽ sơ đồ khối)
viết phương trình nhập một dãy số nguyên A gồm b phần tử và một số nguyên k. đếm số lượng phần tử bằng k có trong dãy
#include <bits/stdc++.h>
using namespace std;
long long i,n,k,dem,x;
int main()
{
cin>>n>>k;
dem=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x==k) dem++;
}
cout<<dem;
return 0;
}
C++;
Cho 1 dãy gồm n số nguyên A=(a1,a2,...,an) và 1 số nguyên k. hãy xác định xem trong dãy A có tồn tại 2 phần tử a[p] và a[q] ở 2 vị trí khác nhau p khác q mà a[p] - a[q]=k hay không.
Input:
-Dòng 1 chứa số nguyên n và k(2<=n<=10^5,|k|<=2.10^9)
-Dòng 2 chứa n sô nguyên a1,a2,...,an (với mọi |a[i]<=2.10^9)
Output: Ghi ra 2 chỉ sô p,q tìm đc. Nếu không tồn tại cặp số thỏa mãn yêu cầu, ghi ra 2 số 0.
Bài 1. Nhập vào một dãy A gồm N (N <= 250) phần tử và một số k. Cho biết số K có trong mảng hay không?. Nếu có đa ra vị trí của số hạng có giá trị bằng k trong dãy.
Bài 1:
#include <bits/stdc++.h>
using namespace std;
long long a[250],i,n,k;
int main()
{
cin>>n>>k;
for (i=1; i<=n; i++)
cin>>a[i];
for (i=1; i<=n; i++)
if (a[i]==k) cout<<i<<" ";
return 0;
}
nhập vào một dãy số nguyên gồm n phần tử và một số nguyên A. hãy thông báo xem phần tử A có xuất hiện trong dãy số đó hay không?
Program HOC24;
var n,a,i,d: integer;
x: array[1..32000] of integer;
begin
write('Nhap n: '); readln(n);
for i:=1 to n do
begin
write('Nhap phan tu thu ',i,': '); readln(x[i]);
end;
write('Nhap A: '); readln(a);
d:=0;
for i:=1 to n do if x[i]=a then d:=1;
if d=1 then write(A,' xuat hien trong day') else write(A,' khong xuat hien trong day');
readln
end.
uses crt;
var n,i,a1:integer;
a:array[1..100] of integer;
begin
writeln('nhap n'); readln(n);
writeln('nhap a'); readln(a1);
for i:=1 to n do
begin
readln(a[i]);
if (a[i]=a1) then
begin
write(' so a co xuat hien trong day');
break;
end;
if (i<n) then continue;
writeln('Khong co so a trong day');
end;
readln;
end.
uses crt;
var b:array[1..1000]of longint;n,a,i,d:longint;
begin
clrscr;
write('nhap so phan tu');readln(n);
for i:=1 to n do
begin
write('nhap phan tu thu',i,':');readln(b[i]);
end;
write('nhap so can tim kiem trong day so vua nhap:');readln(a);
d:=0;
for i:=1 to n do if(b[i]=a)then d:=1;
if d=0 then writeln('so',a,'ko co trong day so')else writeln('so',a,'co trong day so');
readln;
end.
Cho dãy số nguyên gồm N phần tử a 1 , a 2 , ..., a N .
(1 ≤ N ≤ 100, 0 ≤ a i ≤ 32767, 1 ≤ i ≤ N)
Yêu cầu: Hãy tìm số K, là số lượng lớn nhất các phần tử liên tiếp có giá trị bằng 0
trong dãy số trên.
Dữ liệu vào: Nhập số tự nhiên N và dãy số a 1 , a 2 , ..., a N từ bàn phím.
Dữ liệu ra: In ra màn hình số K tìm được.
Ví dụ: Nhập vào từ bàn phím N = 13, giá trị các phần tử của dãy số lần lượt là:
2 0 0 5 8 0 0 0 6 0 7 8 1
In ra màn hình kết quả K = 3