Pascal khó, cần giúp đỡ

[socola01]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Các anh chị giúp em bài này với, em đang cần gấp lắm ạ.

Lập chương trình tìm danh sách số thứ tự học sinh lớp 11a2 và viết ra màn hình họ tên và số thứ tự của học sinh đó (lớp nào và tên ai thì các anh chị cứ tùy chọn để minh hoạ )

 

[quan8d98]

theo tôi thì bài có phải như này không :nhập tên các học sinh không theo 1 trật tự nào .xong rồi in ra một dãy tên như ban đầu không ?
+Nếu phai thì bài như sau:
uses crt;
var n,i:byte;
t:array[1..40] of string;
begin
clrscr;
write('Lop11a2 co bao nhieu hoc sinh: ');
readln(n);
for i:=1 to n do
begin
write('Ten hoc sinh thu ',i,': ');
readln(t);
end;
for i:=1 to n do
writeln('ten hoc sinh thu ',i,': ',t);
readln
end.
+còn nếu không thì ngày mai tôi post tiếp .Bạn chịu khó nhé!
Tái Bút:bài trên tôi đã làm thử trên máy rồi bạn không lo đâu!