Giúp mình nha:
1.Khai báo biến lưu điểm Tin Học của 40 học sinh lớp 8A
2.Nhập điểm Tin Học cho 40 học sinh lớp 8A
3.In điểm Tin Học của lớp 8A ra màn hình
4.Gán điểm cho học sinh thứ 10 của mảng trên là 8.5 điểm
Giúp mình nha:
1.Khai báo biến lưu điểm Tin Học của 40 học sinh lớp 8A
2.Nhập điểm Tin Học cho 40 học sinh lớp 8A
3.In điểm Tin Học của lớp 8A ra màn hình
4.Gán điểm cho học sinh thứ 10 của mảng trên là 8.5 điểm
1 var diemtin : array[1..40] of real;
2
writeln(‘nhap diem lan luot cho 40 hoc sinh’);
for i:=1 to 40 do
readln(diemtin[i]);
3
for i:=1 to 40 do
writeln(‘diem tin cua hoc sinh thu ‘,i,’ :’,diemtin[i]);
4
diemtin[10]:=8.5