Cho một mảng dtoan dùng để lưu trữ điểm thi môn toán của học sinh khối 11 (giả sử khối 11 có 500 học sinh). Viết chương trình thực hiện các yêu cầu: a. Nhập điểm cho các học sinh b. Tính điểm trung bình của các học sinh c. Đếm xem có bao nhiêu học sinh thủ khoa môn toán

shinshin1205

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 31 xem

1 trả lời

Thích Trả lời

hoaconlonton2112

Program BTT;
Uses crt;
Var A: array[1..500] of real;
n,i,d: longint;
max,s: real;
Begin
Clrscr;
Write('Nhap so hoc sinh: '); Readln(n);
max:=0; s:=0;
For i:=1 to n do
Begin
Write('Nhap diem hoc sinh thu ',i,': ');
Readln(A[i]);
If A[i]>max then max:=A[i];
s:=s+A[i];
End;

d:=0;
For i:=1 to n do
If A[i]=max then inc(d);
Writeln('DTB la: ',s/n:0:2);
Write('Co ',d,' thu khoa');
Readln
End.

Vote (0) Phản hồi (0) 2 năm trước

thanhthanh2005thao

Program BT;
Uses crt;
Var A: array[1..500] of real;
n,i,d: longint;
max,s: real;
Begin
Clrscr;
Write('Nhap so hoc sinh: '); Readln(n);
max:=0; s:=0;
For i:=1 to n do
Begin
Write('Nhap diem hoc sinh thu ',i,': ');
Readln(A[i]);
If A[i]>max then max:=A[i];
s:=s+A[i];
End;

d:=0;
For i:=1 to n do
If A[i]=max then inc(d);
Writeln('DTB la: ',s/n:0:2);
Write('Co ',d,' thu khoa');
Readln
End.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

nêu cấu trúc chung của máy tính điện tự ? bổ xử lí là gì ? có mấy loại bộ nhớ ? có mấy loại phần mền

Điểm giống nhau và khác nhau của cuộc phát kiến địa lí của tây ban nha và bồ đào nha Giúp mik trả lời câu hỏi này vs ak

Bài 3 A=[2xy/(x^2-y^2+(x-y)/(2x+2y)*2x/(x+y)+y/(x-y) 1)Rút gọn A 2)Cho x<y<0 và (x^2+y^2)/xy=25/12. Tính giá trị biểu thức A. Bài 4 Cho tam giác ABC nhọn. Vẽ ở phía ngoài tam giác các hình vuông ABDE, ACFH. Gọi O là giao điểm của BH và EC. Chứng minh rằng: 1)Tam giác EAC=tam giác BAH 2)EC vuông góc với BH 3)D,O,F thẳng hàng Bài 5 Tìm các cặp x, y thoả mãn: (x^2+1)(x^2+y^2)=4x^2y

Mọi nguwofi giải bài này gấp giúp mình

Cho các số thực a;b;c đôi một phân biệt thỏa mãn: a/(1+ab)=b/(1+bc) = c/(1+ca) Tính M=a.b.c Giúp em với cần gấp ạ:

Một khẩu đại bác khối lượng 6000 kg bắn đi một đầu đạn khối lượng 37,5 kg. Khi đạn nổ, khẩu súng giật lùi về phía sau với vận tốc v1 = 2,5m/s. Tính vận tốc của đầu đạn đạt được.

Các thành phần kinh tế gồm +Kinh tế nhà nước + Kinh tế tư nhân + Kinh tế tư bản nhà nước + Kinh tế tập thể + Kinh tế có vốn đầu tư nước ngoài thành phần kinh tế nào quan trọng nhất và vì sao?

Giúp mình cậu này được không? Cho HTC ABCD(AB//CD, AB<CD). AH, BK là 2 đường cao(H,K thuộc CD) a,CM: ABKH là HCN b,CM: DH=CK c, A đối xứng với D qua H, CM: ABCE là hbh

Tìm ra lỗi sai và sửa lại 1. Our neighbors invited my friend and I to dinner with them. 2. You should try your best learning hard to pass the exam.

Cho 50g hỗn hợp Mg và FeO tác dụng vs dung dịch H2SO4 thu được 11,2g H2(đieuf kiện tiêu chuẩn) a viết phương trình hoá học b tính khối lượng mỗi chất FeO 50g hỗn hợp c cho số Mg trên phản ứng vừa đủ 500g dung dịch bạc nitrat tính tổng phần trăm dung dich thu được sau phản ứng

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến