Viết chương trình nhập vào 6 số nguyên từ bàn phím ( các số nguyên thuộc đoạn [-250,250] ). Tính trung bình cộng của các số nguyên đó. (làm tròn đến 2 số sau dấu thập phân và chỉ sử dụng 2 biến để tính trung bình cộng) Em mong mọi người giải giúp em tại em làm nó cứ báo lỗi miết ạ. Em xin cảm ơn

2 biến gồm 1 biến nhập 6 số và 1 biến tổng.

program bai_giai;
uses crt;
var n,t:integer;
begin
    clrscr;
    read(n); t:=t+n;
    read(n); t:=t+n;
    read(n); t:=t+n;
    read(n); t:=t+n;
    read(n); t:=t+n;
    readln(n); t:=t+n;
    write(t/6:0:2);
    readln;
end.

2 biến gồm biến mảng gồm 7 phần tử (tổng là số thứ 7) và biến chạy for.

program bai_giai;
uses crt;
var A:array[1..7] of integer;
    i:byte;
begin
    clrscr;
    A[7]:=0;
    for i:=1 to 6 do
        begin
            read(A[i]);
            A[7]:=A[7]+A[i];
        end;
    write(A[7]/6:0:2);
    readln; readln;
end.