Question

Em hãy viết chuơng trình Pascal nhập điểm trung bình của các bạn trong lớp và thông báo điểm trung bình của những bạn lớn hơn hoặc bằng 5 Giúp mik vs mn mai mik còn ktra nx

Answer 1

program DiemTrungBinh;
var
  diem: real;
  i, n: integer;
begin
  write('Nhap so luong ban trong lop: ');
  readln(n);
  
  for i := 1 to n do
  begin
    write('Nhap diem trung binh cua ban ', i, ': ');
    readln(diem);
    if diem >= 5 then
      writeln('Diem trung binh cua ban ', i, ' la: ', diem:0:2);
  end;
end.