Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
int main()
{
ll n; cin >> n; //Nhập n;
ll a[n+5]; //Tạo mảng
vector<ll> v; //Tạo vector lưu vị trí của x (Có thể dùng mảng để lưu nhưng phải tạo thêm biến j để tăng chỉ số mỗi lần tìm được)
for(ll i=1;i<=n;i++) cin >> a[i]; //Nhập phần tử mảng
ll x, dem=0; //tạo x và biến đếm phần tử = x
cin >> x; //Nhập phần tử x;
for(ll i=1;i<=n;i++) {
if(a[i]==x) dem++, v.push_back(i); //lưu vị trí i vào vector
}
if(dem==0) cout << "0"; //nếu đếm bằng 0 thì k cần in ra chỉ số
else {
cout << dem << "\n"; //in ra đếm
for(auto it:v) cout << it << " "; //in ra chỉ số của phần tử bằng x
}
}
(Bạn có thể dùng thư viện iostream thay cho bits/stdc++.h và thay ll thành int cũng được nhé)
Chúc bạn học tốt!
Program ct;
Var i,n,so le, so chan:integer;
B:Array[1..n] of integer;
Begin
Write('n=');Readln(n);
For i:=1 to n do begin Write('B[',i,']=');
Readln(B[i]);
End;
For i:=1 to n do Begin
if B[i] mod 2 <>0 then writeln('so le , ' );
If B[i] mod 2=0 then writeln('so chan ,' );
End;
Readln
End.
Lời giải:
Bài 1 :
a) var A : array[1..100] of real ;
b) var B : array[1..20] of integer ;
c) A[7] := 8 ;
Bài 2 :
program hotrinhoc ;
var a: array[1..32000] of integer ;
i,n: integer ;
begin
write('nhap do dai cua mang'); readln(n);
write('Nhap cac gia tri cua phan tu');
for i:= 1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
readln
end.
Bài 3 :
program hotrinhoc ;
var a: array[1..32000] of integer ;
i,n: integer ;
begin
write('Co tat ca so ban hoc sinh la'); readln(n);
write('Nhap diem mon tin cua cac ban');
for i:= 1 to n do
begin
write('Ban thu ',i,':'); readln(a[i]);
end;
readln
end.
Bài 4 : a,b giống bài 3
c)
program hotrinhoc ;
var a: array[1..32000] of integer ;
i,n,tong : integer ;
begin
write('nhap do dai cua mang'); readln(n);
write('Nhap cac gia tri cua phan tu');
for i:= 1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
tong:=0;
for i:= 1 to n do
if a[i] > 0 then tong:=tong+1;
write('Ket qua la',tong);
readln
end.
Bài 5: a và b tương tự bài 3
c+d )
program hotrinhoc ;
var a: array[1..32000] of integer ;
i,n: integer ;
begin
write('nhap do dai cua mang'); readln(n);
write('Nhap cac gia tri cua phan tu');
for i:= 1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
for i:= 1 to n do
c) if i mod 2= 0 then write('Cac so chan cua mang la:',i);
d) if i mod 2= 1 then write('Cac so le cua mang la:',i);
readln
end.
Lời giải :
program hotrotinhoc l
var a : array[1..32000] of integer ;
N,i : integer ;
function NT(n:longint) : boolean ;
var i: longint ;
kt : boolean ;
begnin
kt:= true;
for i:= 2 to round(sqrt(n)) do
if n mod i=0 then kt:= false ;
NT:=kt ;
end;
begin
write('Nhap do dai cua mang'); readln(n);
writeln('Nhap gia tri cua cac phan tu');
for i:= 1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
for i:= 1 to n do
begin
if (a[i]>2) and NT(a[i]) then write('trong mang co so nguyen to') else write('trong mang khong co so nguyen to');
if (a[i]>2) and NT(a[i]) then write('Cac so nguyen to trong mang la:',A[i]:5);
end;
readln
end.
#include <bits/stdc++.h>
using namespace std;
long long b[1000],i,n,j,t,dem;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>b[i];
dem=0;
for (i=1; i<=n; i++)
{
t=0;
for (j=1; j<=b[i]/2; j++)
if (b[i]%j==0) t+=j;
if (t==b[i]) dem++;
}
cout<<dem;
return 0;
}
uses crt;
var a:array[1..100]of integer;
n,i,kt:integer;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
{---------------------------xu-ly----------------------------}
kt:=0;
for i:=1 to n-1 do
if a[i]>=a[i+1] then kt:=1;
if kt=0 then writeln('day la day tang dan')
else writeln('day khong la day tang dan');
readln;
end.
uses crt;
var a:array[1..100]of integer;
n,i,kt:integer;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
{---------------------------xu-ly----------------------------}
kt:=0;
for i:=1 to n-1 do
if a[i]>=a[i+1] then kt:=1;
if kt=0 then writeln('day la day tang dan')
else writeln('day khong la day tang dan');
readln;
end.
B1:
uses crt;
var n,i:longint;
begin
write('nhap n= ');readln(n);
for i:=1 to n do n:=n*1;
write('n!= ',n);
readln
end.
Lời giải :
Bài 2 :
program hotrotinhoc ;
var a : array[1..32000] of integer ;
i,n : integer ;
begin
write('Nhap do dai cua mang :'); readln(n);
writeln('Nhap gia tri cua cac phan tu');
for i:= 1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
for i:= 1 to n do
if a[i] mod 2 <> 1 then write(a[i],' ');
readln
end.
a:
#include <bits/stdc++.h>
using namespace std;
double a[1000];
int n,i;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++) cout<<a[i]<<" ";
return 0;
}
b:
#include <bits/stdc++.h>
using namespace std;
long long a[50],n,i,t;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
t=0;
for (i=1; i<=n; i++) t+=a[i];
cout<<t;
return 0;
}
bạn có thể nào làm cho mình phần b làm theo kiểu lớp 8 đc không chứ nhìn như này mik ko hiểu