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
Thảo Nguyên 36-88
Xem chi tiết
JamesDang
26 tháng 3 2022 lúc 20:01

uses crt;
var a: array[1..100] of longint;
    i,n,max,min: longint;

begin
    clrscr;
    readln(n);
    for i:=1 to n do
    begin
        write('Nhap so thu ',i,': '); 
        readln(a[i]);
    end;
    max:=a[1]; min:=a[1];
    for i:=1 to n do
    begin
        if max<a[i] then max:=a[i];
        if min>a[i] then min:=a[i];
    end;
    writeln('So lon nhat trong mang la: ',max);
    write('So nho nhat trong mang la: ',min);
    readln
end.

Benny
Xem chi tiết
Nguyễn Lê Phước Thịnh
9 tháng 3 2023 lúc 14:55

6:

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,A[100],i,dem=0;

cin>>n;

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

for (int i=1;i<=n; i++)

if (A[i]%2!=0) dem++;

cout<<dem;

return 0;

}

5:

#include <bits/stdc++.h>

using namespace std;

int main()

{

long long n,nn=1e6,A[1000];

cin>>n;

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

for (int i=1; i<=n; i++)

nn=min(nn,A[i]);

for (int i=1; i<=n; i++)

if (nn==A[i]) cout<<i<<" ";

return 0;

}

phạm hải nam
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 3 2022 lúc 9:46

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,t;

int main()

{

cin>>n;

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

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

cout<<endl;

t=0;

for (i=1; i<=n; i++) t+=a[i];

cout<<t;

return 0;

}

Quốc thuận Lê
Xem chi tiết
Phía sau một cô gái
10 tháng 4 2023 lúc 22:55

program PSMCG;

uses crt;

const N = 5;

type MangA = array[1..N] of integer;

var A: MangA;

     i, max, min, sum: integer;

begin

     for i := 1 to N do

     begin

          write('Nhap phan tu A[', i, ']: ');

          readln(A[i]);

     end;

     writeln('Mang A: ');

     for i := 1 to N do

     begin

          write(A[i], ' ');

     end;

     writeln;

     max := A[1];

     min := A[1];

     for i := 2 to N do

     begin

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

          if A[i] < min then min := A[i];

     end;

     writeln('Gia tri lon nhat la: ', max);

     writeln('Gia tri nho nhat la: ', min);

     sum := 0;

     for i := 1 to N do

     begin

          sum := sum + A[i];

     end;

     writeln('Tong gia tri trong mang A la: ', sum);

     readln;

end.

Ánh sao
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 4 2021 lúc 20:15

Câu 1: 

uses crt;

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

max,i:integer;

begin

clrscr;

for i:=1 to 5 do 

  begin

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

end;

max:=a[1];

for i:=1 to 5 do 

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

writeln(max);

readln;

end.

Nguyễn Lê Phước Thịnh
8 tháng 4 2021 lúc 20:16

Câu 2: 

uses crt;

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

min,i:integer;

begin

clrscr;

for i:=1 to 6 do 

  begin

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

end;

min:=a[1];

for i:=1 to 6 do 

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

writeln(min);

readln;

end.

Kien
Xem chi tiết
Joc Bok
Xem chi tiết
Minh Lệ
5 tháng 8 2021 lúc 17:21

Program HOC24;

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

i,n: integer;

begin

write('Nhap so phan tu cua mang: '); readln(n);

for i:=1 to n do

begin

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

end;

write('Mang vua nhap: '); 

for i:=1 to n do write(a[i],' ');

writeln;

write('Cac so chan trong mang la: ');

for i:=1 to n do if a[i] mod 2=0 then write(a[i],' ');

writeln;

write('Cac so chinh phuong trong mang la: ');

for i:=1 to n do if if sqr(trunc(sqrt(a[i])))=a[i] then write(a[i],' ');

readln

end.

Thảo Nguyễn
Xem chi tiết
Nguyễn Lê Phước Thịnh
24 tháng 12 2021 lúc 10:41

#include <bits/stdc++.h>

using namespace std;

long long a[10000],n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

{

cin>>a[i];

t=t+a[i];

}

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

cout<<endl;

dem=0;

for (i=1; i<=n; i++) 

if (a[i] %2==0) dem++;

cout<<dem<<endl;

cout<<t;

return 0;

}

Lê Thị Hồng anh
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 2 2022 lúc 21:29

#include <bits/stdc++.h>

using namespace std;

long long a[40],i,n,ln;

int main()

{

cin>>n;

for (i=1; i<=n; i++)

{

cin>>a[i];

}

ln=a[1];

for (i=1; i<=n; i++) ln=max(ln,a[i]);

for (i=n; i>=1; i--)

if (ln==a[i]) 

{

cout<<i;

break;

}

return 0;

}