Bài 9. Làm việc với dãy số

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

Viết chương trình in ra màn hình các điểm của các học sinh.

In ra màn hình các điểm trên 5.

Tính trung bình các điểm trên 5.

Sử dụng khai báo biến mảng

Diệp Bích Thiên
25 tháng 3 2018 lúc 0:28

var i, n, S, TB : integer;

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

begin

write ( ' so hoc sinh la n = '); readln (n);

writeln ('nhap so diem');

for i :=1 to n do

begin

readlm (diem[i]);

end;

begin

for i:=1 to n do

if diem[a]>5 then

S:= S + diem[i];

TB:= S/n;

writeln ('diem trung binh cac so tren 5 la' TB);

end;

End.


Các câu hỏi tương tự
Nguyến Ngọc Nguyên
Xem chi tiết
Tiểu cường
Xem chi tiết
jennierubyjane
Xem chi tiết
Nguyễn Quỳnh Anh 8A
Xem chi tiết
Thư ĐT
Xem chi tiết
Uchiha Obito
Xem chi tiết
Lê Thị Phương Dung
Xem chi tiết
Huyền Trần
Xem chi tiết
Hoàng Phương Uyên Phạm
Xem chi tiết
Hương Đinh
Xem chi tiết