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á...

2

VM

vũ minh nhật

1 tháng 1 2022

a

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;

}

Viết chương trình thực hiện các yêu cầu sau:a) Nhập mảng A có n phần tửb) In mảng A đã nhập ra màn hìnhc) Tìm giá trị lớn nhất của mảng Ad) Tìm giá trị nhỏ nhất của mảng...

HC

huynh chinh

15 tháng 4 2023

1

H9

HT.Phong (9A5)

CTVHS

15 tháng 4 2023

Uses crt;

var i,n,min,max: longint;

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

begin clrscr;

readln(n);

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

writeln(a[i]:3)

max:=a[1];

for i:=1 to n do begin

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

end;

writeln(max);

min:=a[1];

for i:=1 to n do begin

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

end;

writeln(min);

readln;

end.

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

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.

Viết chương trình thực hiện các yêu cầu sau: 1) Nhập một mảng A có N phần tử; 2) In mảng A đã nhập ra màn hình; 3) Tìm giá trị lớn nhất (nhỏ nhất) của mảng A; 4) Tính tổng mảng...

QT

Quốc thuận Lê

10 tháng 4 2023

1

PS

Phía sau một cô gái

10 tháng 4 2023

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ập mảng một chiều gồm m số nguyên ( 0<m<50). Viết chương trìnhthực hiện các công việc sau:a. Nhập mảng từ bàn phím.b. Hiển thị mảng ra màn hình.c. Tổng các phần tửd. Tìm và in số nhỏ nhất cùng số lần xuất hiện của nó trong dãyhuhu mng giúp mình với ạ, dùng #include<stdio.h> mng nhé huhu gấp lắm ạ ngày kia thi...

QN

Quân Nguyễn

25 tháng 6 2021

1

NL

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

26 tháng 6 2021

uses crt;

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

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

begin

clrscr;

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

for i:=1 to m do

begin

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

end;

for i:=1 to m do

write(a[i]:4);

writeln;

t:=0;

for i:=1 to m do

t:=t+a[i];

writeln('Tong cac phan tu la: ',t);

min:=a[1];

for i:=1 to n do

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

vt:=0;

for i:=1 to n do

if min=a[i] then inc(vt);

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

writeln('So lan xuat hien la: ',vt);

readln;

end.

Viết chương trình thực hiện các yêu cầu: (1điểm)- Nhập vào một mảng A có n phần tử là số nguyên.(n <= 50)- In ra màn hình tổng các số lớn hơn 0 trong...

QG

Quản Gia Lynh

20 tháng 4 2023

1

TD

Thanh Đình Lê

20 tháng 4 2023

Đây là một chương trình Python để nhập vào một mảng A có n phần tử và tính tổng các số lớn hơn 0 trong mảng đó:

```python
n = int(input("Nhập số phần tử của mảng: "))
A = []
sum = 0

Nhập các phần tử của mảng

for i in range(n):
A.append(int(input("Nhập phần tử thứ %d: " % (i+1))))

Tính tổng các số lớn hơn 0 trong mảng

for i in range(n):
if A[i] > 0:
sum += A[i]

In ra tổng các số lớn hơn 0 trong mảng

print("Tổng các số lớn hơn 0 trong mảng là:", sum)
```

Giải thích:

Dòng 1: Yêu cầu người dùng nhập số phần tử của mảng.Dòng 2: Khai báo một mảng A rỗng và một biến sum để tính tổng các số lớn hơn 0.Dòng 5-7: Sử dụng vòng lặp for để nhập các phần tử của mảng A từ bàn phím.Dòng 10-13: Sử dụng vòng lặp for để duyệt qua từng phần tử của mảng A. Nếu phần tử đó lớn hơn 0, thì cộng giá trị của nó vào biến sum.Dòng 16: In ra tổng các số lớn hơn 0 trong mảng.

H9

HT.Phong (9A5)

CTVHS

20 tháng 4 2023

Lớp 8 học pascal anh ạ

giúp em với ạ em đang thi hết môn cần gấpViết chương trình thực hiện các công việc sau:a) Nhập một mảng 10 phần tử và hiển thị mảng vừa nhập ra màn hình.b) Tìm phần tử nhỏ nhất trong mảng.c) Đếm xem có bao nhiêu số lẻ và tính trung bình cộng các số lẻ trong mảng.d) Sắp xếp mảng theo thứ tự tăng dầnCâu 4: (2 điểm)Viết chương trình thực hiện các công việc sau:a) Nhập vào từ bàn phím một xâu ký tự...

LM

Lô Minh Quân

4 tháng 3 2022

2

NL

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

4 tháng 3 2022

Câu 4:

#include <bits/stdc++.h>

using namespace std;

string st;

int d,i,dem;

char x;

int main()

{

getline(cin,st);

d=st.length();

cout<<st<<endl;

cin>>x;

dem=0;

for (i=0; i<=d-1; i++) if (st[i]==x) dem++;

cout<<dem;

return 0;

}

1

︵¹⁶๖ۣۜCậⓊ︵✰Ⓥàńg̲̅︵⁹⁹

4 tháng 3 2022

Câu 4:

#include <bits/stdc++.h>

using namespace std;

string st;

int d,i,dem;

char x;

int main()

{

getline(cin,st);

d=st.length();

cout<<st<<endl;

cin>>x;

dem=0;

for (i=0; i<=d-1; i++) if (st[i]==x) dem++;

cout<<dem;

return 0;

}

H

hihi

25 tháng 2 2021

Cho mảng B gồm n (n ≤ 100) phần tủ nguyên. Viết chương trình thực hiện các yêu cầu sau:

a. Đếm xem trong mảng có bao nhiêu phần tử âm, phần tử dương.

b. Tính trung cộng các phần tử khác 0 trong mảng.

c. Đưa ra màn hình giá trị nhỏ nhất cùng với chỉ số.

1

NL

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

25 tháng 2 2021

uses crt;

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

i,n,dem,dem1,dem2,t:integer;

begin

clrscr;

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

for i:=1 to n do

begin

write('B[',i,']='); readln(b[i]);

end;

dem:=0;

dem1:=0;

for i:=1 to n do

begin

if b[i]<0 then inc(dem);

if b[i]>0 then inc(dem1);

end;

writeln('So phan tu am la: ',dem);

writeln('So phan tu duong la: ',dem1);

t:=0;

for i:=1 to n do

if b[i]<>0 then t:=t+b[i];

writeln('Trung binh cac phan tu khac 0 trong mang la: ',t/(dem+dem1):4:2);

min:=b[1];

for i:=1 to n do

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

dem2:=0;

for i:=1 to n do

if min=b[i] then

begin

inc(dem2);

a[dem2]:=i;

end;

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

writeln('Chi so la: ');

for i:=1 to dem2 do

write(a[i]:4);

readln;

end.

H

Heloooo

11 tháng 5 2022

Nhập mảng n<-100 số nguyên. Tính tống các phần tử lớn nhất trong mảng và xuất ra vị trí của các phần tử lớn nhất trong mảng, viết chương trình sau.Giúp em với ạ.

viết chương trình nhập vào mảng một chiều.gồm phần tử số nguyên N được nhập từ bàn phím. N nguyên, dương, N<=10A, in mảng vừa nhập ra màn hìnhB, tính tổng các phần tử của mảng, in kết qua ra màn hìnhC, đếm số lượng các phần tử có giá trị dươngD, tính trung bình cộng các số có giá trị chẵnE, in ra màn hình các phần tử là số hoàn hảoGiúp mình với...

NT

Nguyễn tiên

20 tháng 1 2022

3

NL

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

20 tháng 1 2022

uses crt;

var a:array[1..10]of longint;

n,i,t,dem,dem1,dem2,t1:integer;

begin

clrscr;

readln(n);

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

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

writeln;

t:=0;

for i:=1 to n do t:=t+a[i];

writeln(t);

t1:=0;

dem1:=0;

dem2:=0;

for i:=1 to n do

begin

if a[i]>0 then dem1:=dem+1;

if a[i] mod 2=0 then

begin

dem2:=dem2+1;

t1:=t1+a[i];

end;

writeln(dem1);

writeln(t1/dem2:4:2);

readln;

end.

CX

Chanh Xanh

20 tháng 1 2022

viết chương trình nhập vào mảng một chiều.gồm phần tử số nguyên N được nhập từ bàn phím. N nguyên, dương, N<=10A, in mảng vừa nhập ra màn hìnhB, tính tổng các phần tử của mảng, in kết qua ra màn hìnhC, đếm số lượng các phần tử có giá trị dươngD, tính trung bình cộng các số có giá trị chẵnE, in ra màn hình các phần tử là số hoàn...

NT

Nguyễn tiên

20 tháng 1 2022

1

NL

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

20 tháng 1 2022

uses crt;

var a:array[1..10]of longint;

n,i,t,dem,dem1,dem2,t1:integer;

begin

clrscr;

readln(n);

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

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

writeln;

t:=0;

for i:=1 to n do t:=t+a[i];

writeln(t);

t1:=0;

dem1:=0;

dem2:=0;

for i:=1 to n do

begin

if a[i]>0 then dem1:=dem+1;

if a[i] mod 2=0 then

begin

dem2:=dem2+1;

t1:=t1+a[i];

end;

writeln(dem1);

writeln(t1/dem2:4:2);

readln;

end.