Viết 2 chương trình con tìm Max, Min và vị trí của Max, Min trong mảng. Áp dụng: Nhập vào 1 mảng có n phần tử là các số nguyên, tìm số nguyên lớn nhất, nhỏ nhất và vị trí của các số đó trong mảng. Các...

TD

TÌNH ĐIÊN DẠI

2 tháng 10 2021

Viết 2 chương trình con tìm Max, Min và vị trí của Max, Min trong mảng. Áp dụng: Nhập vào 1 mảng có n phần tử là các số nguyên, tìm số nguyên lớn nhất, nhỏ nhất và vị trí của các số đó trong mảng. Các số có giá trị thuộc kiểu int.Input: đọc từ file 0100.inpDòng 1 là số nguyên dương nDòng 2 là n số nguyênOutput: ghi ra file 0100.out gồm 2 dòng:Dòng 1 chứa số lớn nhất trong mảng và các vị trí của số lớn nhất;Dòng 2...

Đọc tiếp

#Tin học lớp 11

0

MT

my trần

29 tháng 8 2021

1. Viết chương trình nhập vào mảng gồm n số nguyên, - Đếm và đưa ra số phần tử chẵn của mảng - đưa ra số chẵn lớn nhất trong mảng - Tính tổng các số ở vị trí lẻ trong mảng - Tìm giá trị phần tử lẻ nhỏ nhất

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

30 tháng 8 2021

uses crt;

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

i,n,dem,max,t,min,dem1:integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

dem:=0;

max:=-32000;

for i:=1 to n do

begin

if a[i] mod 2=0 then

begin

dem:=dem+1;

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

end;

if dem=0 then writeln('Trong day khong co so chan')

else begin

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

writeln('So chan lon nhat la: ',max);

end;

t:=0;

for i:=1 to n do

if i mod 2=1 then t:=t+a[i];

writeln('Tong cac so o vi tri le la: ',t);

min:=maxint;

dem1:=0;

for i:=1 to n do

if a[i] mod 2<>0 then

begin

inc(dem1);

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

end;

if dem1=0 then writeln('Trong day khong co so le')

else writeln('So le nho nhat la: ',min);

readln;

end.

Đúng(1)

PU

Phan uyển nhi

28 tháng 2 2022

Viết chương trình C++ biết nhập vào một mảng số nguyên. Tìm các phần tử nhỏ nhất của mảng, đưa ra các vị trí tại đó đạt giá trị nhỏ nhất.

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

28 tháng 2 2022

#include <bits/stdc++.h>

using namespace std;

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

int main()

{

cin>>n;

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

nn=a[1];

for (i=1; i<=n; i++) nn=min(nn,a[i]);

cout<<nn<<endl;

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

return 0;

}

Đúng(2)

HV

Hằng Võ Thanh

3 tháng 5 2022

Viết chương trình nhập vào 1 mảng số nguyên có n phần tử. Tìm phần tử lớn nhất trong mảng và vi trí của phần tử lớn nhất đó

#Tin học lớp 8

1

ML

Minh Lệ

4 tháng 5 2022

Program HOC24;

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

i,n,max: integer;

begin

for i:=1 to n do

begin

write('Nhap phan tu thu ',i,': '); readln(a[i]);

end;

t:=a[1];

for i:=2 to n do if a[i]>max then max:=a[i];

writeln('So lon nhat trong mang la: ',max);

write('Vi tri cua cac phan tu do la: ');

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

readln

end.

Đúng(0)

T

taf.amp

1 tháng 5 2022

Viết chương trình nhập vào mảng các số nguyên A gồm tối đa 30 phần tử, các phần tử có giá trị không quá 32767? Thông báo ra màn hình phần tử nhỏ nhất và vị trí của nó trong mảng?

#Tin học lớp 8

1

KV

Kiều Vũ Linh

2 tháng 5 2022

Var a:array[1..30] of integer;

i,n,d,max:integer;

Begin

Write('Nhap so luong phan tu cua mang ');readln(n);

For i:=1 to n do

Begin

Write('Nhap phan tu thu ',i,' = ');readln(a[i]);

End;

max:=a[1];

For i:=2 to n do

Begin

If a[i] > max then

Begin

max:=a[i];

d:=i;

End;

Write('Phan tu lon nhat la ',max,' o vi tri ',d);

Readln;

End.

Đúng(0)

T

taf.amp

1 tháng 5 2022

Viết chương trình nhập vào mảng các số nguyên A gồm tối đa 30 phần tử, các phần tử có giá trị không quá 255? Thông báo ra màn hình phần tử lớn nhất và vị trí của nó trong mảng?

#Tin học lớp 8

1

KV

Kiều Vũ Linh

2 tháng 5 2022

Var a:array[1..30] of integer;

i,n,d,max:integer;

Begin

Write('Nhap so luong phan tu cua mang ');readln(n);

For i:=1 to n do

Begin

Write('Nhap phan tu thu ',i,' = ');readln(a[i]);

End;

max:=a[1];

For i:=2 to n do

Begin

If a[i] > max then

Begin

max:=a[i];

d:=i;

End;

Write('Phan tu lon nhat la ',max,' o vi tri ',d);

Readln;

End.

Đúng(0)

TD

Thi Đua Khen Thưởng

24 tháng 3 2021

Nhập vào 1 mảng có N số nguyên ( N< 1000 )

1) Tính tổng các số chia hết cho 3 trong mảng vừa nhập

2) Tìm giá trị nhỏ nhất trong mảng , đưa ra vị trí đó . Nếu có nhiều vị trí chứa giá trị nhỏ nhất thì đưa ra vị trí lớn nhất trong các vị trí đó .

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

25 tháng 3 2021

uses crt;

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

i,n,t,min,vt:integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

t:=0;

for i:=1 to n do

if a[i] mod 3=0 then t:=t+a[i];

writeln('Tong cac so chia het cho 3 la: ',t);

min:=a[1];

for i:=1 to n do

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

vt:=1;

for i:=1 to n do

if min=a[i] then

begin

if vt<i then vt:=i;

end;

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

writeln('Vi tri la: ',vt);

readln;

end.

Đúng(0)

VT

Vương Thị Minh Tâm

1 tháng 1 2022

Viết chương trình thực hiện các yêu cầu sau:a- Nhận mảng n số nguyên, xuất mảng vừa nhập ra màn hìnhb-Tìm số lớn nhất trong mảng một chiều trênc-Tìm vị trí các số nhỏ nhất trong mảng một chiềud-Đếm các số chính phương có trong mảng một chiềue-hiển thị các số nguyên tố có trong mảng một chiềuf-sắp xếp mảng một...

Đọc tiếp

#Tin học lớp 11

2

VM

vũ minh nhật

1 tháng 1 2022

a

Đúng(0)

NL

Nguyễn Lê Phước Thịnh

1 tháng 1 2022

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n;

int main()

{

cin>>n;

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

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

return 0;

}

Đúng(0)

PV

Phương Vũ Hà

1 tháng 3 2021

Nhập vào một mảng gồm N số nguyên và số nguyên k Tìm và đưa ra màn hình : a, Giá trị lớn nhất của mảng và vị trí lớn nhất đó b, Giá trị nhỏ nhất của mảng và vị trí nhỏ nhất đó c, Tính tổng bình phương các giá trị ở vị trí chẵn

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

1 tháng 3 2021

uses crt;

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

n,i,k,max,min,t: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);

max:=a[1];

for i:=1 to n do

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

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

writeln('Vi tri la: ');

for i:=1 to n do

if max=a[i] then write(i:4);

writeln;

min:=a[1];

for i:=1 to n do

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

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

writeln('Vi tri la: ');

for i:=1 to n do

if min=a[i] then write(i:4);

writeln;

t:=0;

for i:=1 to n do

if i mod 2=0 then t:=t+sqr(a[i]);

writeln('Tong binh phuong cac gia tri o vi tri chan la: ',t);

readln;

end.

Đúng(2)

TL

Thọ Lê Đức

27 tháng 4 2023

Bài 23: Viết chương trình nhập vào 1 mảng số nguyên.In ra màn hình giá trị trung bình của mảng đó và các phân tử lớn hơn giá trị trung bình của mảng đó Bài 24:Viết chương trình tìm giá trị lớn nhất( in ra vị trí chứa phần tử có giá trị lớn nhất )của dãy số gồm n số nguyên được nhập từ bàn phím CẦN GẤP CÂU TRẢ LỜI Ạ:((

#Tin học lớp 8

2

KV

Kiều Vũ Linh

28 tháng 4 2023

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.

Đúng(0)

KV

Kiều Vũ Linh

28 tháng 4 2023

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.

Đúng(0)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP