K
Khách

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.

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.

18 tháng 4 2023

program Tinh_Tong_Phan_Tu_Chan;

var
  A: array of Integer;
  N, i, sum: Integer;

begin
  Write('Nhap N: ');
  Readln(N);

  SetLength(A, N);

  // Nhập các phần tử cho mảng A
  for i := 0 to N - 1 do
  begin
    Write('Nhap phan tu thu ', i + 1, ': ');
    Readln(A[i]);
  end;

  // In lên màn hình các phần tử của mảng A
  Write('Cac phan tu cua mang la: ');
  for i := 0 to N - 1 do
  begin
    Write(A[i], ' ');
  end;
  Writeln;

  // Tính tổng các phần tử chẵn của mảng A và thông báo kết quả ra màn hình
  sum := 0;
  for i := 0 to N - 1 do
  begin
    if A[i] mod 2 = 0 then
      sum := sum + A[i];
  end;
  Writeln('Tong cac phan tu chan cua mang la: ', sum);

  Readln;
end.

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.
20 tháng 4 2023

Lớp 8 học pascal anh ạ

12 tháng 4 2022

uses crt;

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

i,n,dem,t,tb:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

dem:=0;

t:=0;

for i:=1 to n do 

  if a[i]>0 then

begin

dem:=dem+1;

t:=t+a[i];

end;

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

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

writeln('Trung binh cac phan tu duong la: ',t/dem:4:2);

readln;

end.

12 tháng 4 2022

đúng không đây ạ

 

uses crt;

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

i,n:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

readln;

end.

15 tháng 5 2023

'''python

a. DTB = []

siso = int(input("Nhập số lượng học sinh trong lớp: "))

b. for i in range(siso):

diem = float(input(f"Nhập điểm của học sinh thứ {i+1}: "))

DTB.append(diem)

c. tong=sum(DTB)

d. print(f"Tổng điểm của lớp là: {tong}")'''

14 tháng 4 2023

# Nhập mảng A từ bàn phím
n = int(input("Nhập số lượng phần tử của mảng A: "))
A = []
for i in range(n):
    A.append(int(input("Nhập phần tử thứ {} của mảng A: ".format(i+1))))

# Tính trung bình cộng các phần tử chia hết cho 3 và 5
sum_35 = 0
count_35 = 0
for num in A:
    if num % 3 == 0 and num % 5 == 0:
        sum_35 += num
        count_35 += 1
if count_35 > 0:
    tb_35 = sum_35 / count_35
    print("Trung bình cộng các phần tử chia hết cho 3 và 5 trong mảng A là:", tb_35)
else:
    print("Không có phần tử nào chia hết cho cả 3 và 5 trong mảng A")

# In ra các phần tử chia hết cho M và tính tổng các phần tử chia hết cho M
M = int(input("Nhập giá trị M: "))
sum_M = 0
count_M = 0
for num in A:
    if num % M == 0:
        print(num, end=" ")
        sum_M += num
        count_M += 1
print("\nTổng các phần tử chia hết cho M trong mảng A là:", sum_M)