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

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

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

   Trả lời