Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
0o0 Nhok kawaii 0o0
Xem chi tiết
Nguyễn Chơn Nhân
29 tháng 2 2020 lúc 8:58

duyệt vét ik, hoặc tìm công thức QHĐ

Khách vãng lai đã xóa
Trần Thị Thèo Lèo
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 3 2022 lúc 23:13

#include <bits/stdc++.h>

using namespace std;

long long b[5],i,n,k,dem,kt;

int main()

{

n=5;

for (i=1; i<=n; i++) cin>>b[i];

for (i=1; i<=n; i++) cout<<b[i]<<" ";

cout<<endl;

dem=0;

for (i=1; i<=n; i++) if (b[i]%2==0) dem++;

cout<<"So so chan la: "<<dem<<endl;

cin>>k;

kt=0;

for (i=1; i<=n; i++) if (b[i]==k) 

{

cout<<i<<" ";

kt=1;

}

if (kt==0) cout<<"Khong co k trong day";

sort(b+1,b+n+1);

for (i=1; i<=n; i++) cout<<b[i]<<" ";

return 0;

}

Trần Thị Thèo Lèo
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 3 2022 lúc 12:51

uses crt;

var b:array[1..5]of integer;

i,n,dem,k,tam,j:integer;

kt:boolean;

begin

clrscr;

n:=5;

for i:=1 to n do readln(b[i]);

for i:=1 to n do write(b[i]:4);

writeln;

dem:=0;

for i:=1 to n do if b[i] mod 2=0 then dem:=dem+1;

writeln('So luong so chan la: ',dem);

readln(k);

kt:=false;

for i:=1 to n do 

if b[i]=k then

begin

write(i:4);

kt:=true;

end;

if (kt==false) then writeln('Khong co k trong day')

else writeln;

for i:=1 to n-1 do 

  for j:=i+1 to n do 

if b[i]>b[j] then 

begin

tam:=b[i];

b[i]:=b[j];

b[j]:=tam;

end;

for i:=1 to n do write(b[i]:4);

readln;

end.

Không tên
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 3 2022 lúc 22:42

#include <bits/stdc++.h>

using namespace std;

long long b[15],i,n,k,dem;

bool kt;

int main()

{

n=15;

for (i=1; i<=n; i++) cin>>b[i];

for (i=1; i<=n; i++) cout<<b[i]<<" ";

cout<<endl;

dem=0;

for (i=1; i<=n; i++) if (b[i]%2==0) dem++;

cout<<"So so chan la: "<<dem<<endl;

cin>>k;

kt=false;

for (i=1; i<=n; i++) if (b[i]==k) 

{

cout<<i<<" ";

kt=true;

}

if (kt==false) cout<<"Khong co k trong day";

else cout<<endl;

sort(b+1,b+n+1);

for (i=1; i<=n; i++) cout<<b[i]<<" ";

return 0;

}

Thọ Lê Đức
Xem chi tiết
Kiều Vũ Linh
28 tháng 4 2023 lúc 16:09

Bài 23

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

i,n:integer;

s,tbc:real;

begin

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

for i:=1 to n do

begin

write('Nhap so thu ',i,' = ');readln(a[i]);

s:=s+a[i];

end;

tbc:=s/n;

writeln('Gia tri trung binh la ',tbc:10:2);

write('Cac so lon hon gia tri trung binh la: ');

for i:=1 to n do

if a[i] > tbc then write(a[i]:8);

readln

end.

Kiều Vũ Linh
28 tháng 4 2023 lúc 16:12

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

i,n,max:integer;

begin

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

for i:=1 to n do

begin

write('Nhap so thu ',i,' = ');readln(a[i]);

end;

max:=a[1];

for i:=2 to n do

if a[i] > max then max:=a[i];

for i:=1 to n do

begin

if max=a[i] then write(max,' o vi tri thu ',i);

break;

readln

end.

Trung Kien
Xem chi tiết
Nguyễn Lê Phước Thịnh
17 tháng 3 2021 lúc 21:42

2: 

uses crt;

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

n,i:integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

for i:=1 to n do 

  if a[i]<0 then write(i:4);

readln;

end.

Nguyễn Phương
24 tháng 3 2021 lúc 23:42

sao bài này giống bài tập cô mình giao thế nhỉ:>

 

Lâm Thảo Như
5 tháng 5 2021 lúc 19:14

var max,min,n,i: integer;

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

begin

write('nhap so phan tu: ');readln(n);

for i:=1 to n do

begin

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

end;

max:=a[1];min:=a[1];

for i:=1 to n do

if max<a[i] then max:=a[i];

if min>a[i] then min:=a[i];

write('so lon nhat trong day la: ',max);writeln;

write('so nho nhat trong day la: ',min);writeln;

readln;

end.

Anh Lê duy
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 12 2021 lúc 22:51

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;

}

Anh Lê duy
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 12 2021 lúc 22:40

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;

}

Anh Lê duy
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 12 2021 lúc 22:37

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;

}