INDAYSO

nhập hàm số nguyên in ra day số đó....
bài này như dzầy mà tui khổ sở nèk trùi!!!!
program indayso;
uses crt;
var n,i:integer;
 arr:array [1..100] of integer;
begin
clrscr;
        writeln('nhap sp phan tu:  ');
              readln(n);
for i:=1 to n do
 readln(arr[i]);
 for i:=1 to n do
     write (arr[i] : 4);
readln;
end.