Viết ct nhập vào số học sinh của lớp 8A. Hãy nhập điểm cho từng học sinh trong lớp 23/07/2021 Bởi Kaylee Viết ct nhập vào số học sinh của lớp 8A. Hãy nhập điểm cho từng học sinh trong lớp
uses crt; var a:array[1..100] of real; i,n: integer begin clrscr; write (‘nhap so luong: ‘); readln (n); for i:=1 to n do begin write (‘nhap dien hs ‘,i,’: ‘); readln (a[i]); end; readln; end. Bình luận
đây bạn
uses crt;
var a:array[1..100] of real;
i,n: integer
begin
clrscr;
write (‘nhap so luong: ‘); readln (n);
for i:=1 to n do
begin
write (‘nhap dien hs ‘,i,’: ‘); readln (a[i]);
end;
readln;
end.