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

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

0 bình luận về “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”

  1. 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

Viết một bình luận