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

Question

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

baoquyen · Answer

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.

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”