Tin học 11 ?

[thanhxuan20134]

Viết chương trình tính điểm trung bình của 4 tổ, mỗi tổ gồm 10 người, xếp hạng các tổ?

[duongbacdong2304]

Program cmm;
Var ba: boy; me: girl; ten: string;
Begin
write('Nhap vfao ten ba me may: ');
readln(ten);
End.