viết chương trình nhập vào điểm toán các bạn trong lớp.tính tong các bạn có điểm số trên trung bình 19/07/2021 Bởi Ruby viết chương trình nhập vào điểm toán các bạn trong lớp.tính tong các bạn có điểm số trên trung bình
program BT; uses crt; var n,i: integer; toan,T: real; Begin clrscr; write(‘Nhap so ban trong lop: ‘); readln(n); for i:=1 to n do begin write(‘Nhap diem ban thu ‘,i,’: ‘); readln(toan); if toan>5 then T:=T+toan; end; write(‘Tong ‘,n,’ ban co diem toan tren TB = ‘,T:2:2); readln End. Bình luận
program BT;
uses crt;
var n,i: integer;
toan,T: real;
Begin
clrscr;
write(‘Nhap so ban trong lop: ‘); readln(n);
for i:=1 to n do
begin
write(‘Nhap diem ban thu ‘,i,’: ‘); readln(toan);
if toan>5 then T:=T+toan;
end;
write(‘Tong ‘,n,’ ban co diem toan tren TB = ‘,T:2:2);
readln
End.