Tính và in ra màn hình giá trị trung bình của dãy số vừa nhập

Số hóa dữ liệu là [Tin học - Lớp 6]

2 trả lời

Phân biệt một số loại phần mềm ứng dụng [Tin học - Lớp 7]

1 trả lời

Viết chương trình nhập số nguyên N [0 < N ≤ 10 000] và mảng a gồm N số nguyên. Tính và in ra trung bình cộng của các số âm, số dương trong a. Không tính số 0.

Ví dụ : a[] = {1, -6, 0, 3, -1}. Trung bình cộng là -0.75

Bài giải

PROGRAM tbc_am_duong_mang; USES crt; VAR a:ARRAY[1..100] OF REAL; i,n,x,y:INTEGER; tongam,tongduong,tba,tbd:REAL; BEGIN clrscr; write['So phan tu cua day n= '];readln[n]; FOR i:=1 TO n DO BEGIN write['Nhap phan tu a[',i,']: ']; readln[a[i]]; END; tongam:=0; x:=0; FOR i:=1 TO n DO IF a[i]0 THEN BEGIN tongduong:=tongduong+a[i]; y:=y+1; END; tbd:=tongduong/y; write['TB cong cac so duong la: ',tbd:5:1]; readln; END.

Lorem ipsum dolor sit amet, consectetur adipiscing elit.Morbi adipiscing gravdio, sit amet suscipit risus ultrices eu.Fusce viverra neque at purus laoreet consequa.Vivamus vulputate posuere nisl quis consequat.

Create an account

  • lý thuyết
  • trắc nghiệm
  • hỏi đáp
  • bài tập sgk

Viết chương trình nhập vào 1 dãy số nguyên . Tính và in ra màn hình trung bình cộng các số chẵn có trong dãy số.

Mong mọi người giải giúp mình....]]]]]::::=====

Các câu hỏi tương tự

Video liên quan

Chủ Đề