a. Viết chương trình nhập điểm ktra học kì I môn Lý cho N học sinh , và in ra màn hinh với N và điểm thấp nhất được nhập từ bàn phím

program min_diemly;

uses crt;

var dl:array[1..1000] of real;

     n,i:integer;

     min:real;

begin

clrscr;

write(‘Nhap N= ‘);  readln(n);

for i:=1 to n do

begin

 write(‘Nhap diem ly ban thu ‘,i,’: ‘); 

 readln(dl[i]);

end;

min:=dl[1];

for i:=2 to n do

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

write(‘Diem ly nho nhat la: ‘,min:0:2);

 readln;

end.