program ct;

uses crt;

var Toan,Tin,Tb:array[1..100] of real;

      i,n:integer;

      max,min:real;

begin clrscr;

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

   for i:=1 to n do

     begin

        writeln('Nhap diem toan va tin cua hoc sinh thu ',i,': '); readln(Toan[i],Tin[i]);

     end;

   for i:= 1 to n do

     Tb[i]:=(Toan[i]+Tin[i])/2;

     max:=Tb[1]; 

   for i:=1 to n do

     if Tb[i]>max then max:=Tb[i];

     min:=Tb[i];

   for i:=1 to n do

     if Tb[i]<min then min:=Tb[i];

   writeln('Diem Tb cao nhat la: ',max);

   writeln('Diem Tb thap nhat la: ',min);

readln;

end.

Học tốt!

#include<bits/stdc++.h>
using namespace std;
int main()
{
    int n;
    cin>>n;
    cout<<"Diem toan: ";
    float arr1[n],arr2[n];
    for(int i=0;i<n;i++){
        cin>>arr1[i];
    }
    cout<<"Diem tin: ";
    for(int i=0;i<n;i++){
        cin>>arr2[i];
    }
    float be=(arr1[0]+arr2[0])/2,lon=(arr1[0]+arr2[0])/2;
    for(int i=0;i<n;i++){
        float dtb=(arr1[i]+arr2[i])/2;
        if(lon<dtb){
            lon=dtb;
        }
        if(be>dtb){
            be=dtb;
        }
    }
    cout<<"Diem trung binh cao nhat: "<<lon<<"\nDiem trung binh thap nhat: "<<be;
    //samon247
    return 0;
}