Bài 11: Kiểu mảng

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hoangthidale

Viết chương trình nhập n là số lượng học sinh của một lớp và mảng A gồm phần tử,tương ứng giá trị 1 phần tử là điểm trung bình môn tin học của một học sinh. Hãy cho biết trong lớp có bao nhiều học sinh trên điểm trung bình

Nguyễn Lê Phước Thịnh
21 tháng 6 2020 lúc 19:04

uses crt;

var i,n,dem:integer;

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

begin

clrscr;

write('Nhap so hoc sinh:'); readln(n);

for i:=1 to n do

begin

repeat

write('Nhap diem trung binh mon Tin Hoc cua ban thu ',i,'='); readln(a[i]);

until (0<a[i]) and (a[i]<=10);

end;

dem:=0;

for i:=1 to n do

if a[i]>=5 then inc(dem);

writeln('So ban co diem tren trung binh la: ',dem);

readln;

end.


Các câu hỏi tương tự
Trần Văn Việt Hùng
Xem chi tiết
Võ Thu Hằng
Xem chi tiết
Bàn Chàn Khuân
Xem chi tiết
Bùi Thị Phương Nga
Xem chi tiết
Khánh Mỹ
Xem chi tiết
Đại Văn
Xem chi tiết
Nhân
Xem chi tiết
dương thị hồng
Xem chi tiết
Minh Hoạt
Xem chi tiết