Homework of pascal, please help me find the error
var a:array [1..100] of integer;
n:integer;
procedure nhapmang (var a:array [1..100] of integer;var n: integer);
var i:integer;
begin
write ('nhap n:');
readln (n);
for i:=1 to n do
begin
write ('a[', i, ']=');
readln;
end;
end;
procedure xuatmang ( a:array [1..100] of integer; n: integer);
var i:integer;
begin
for i:=1 to n do
write (a[i]:4);
end;
begin
nhapmang (a, n);
xuatmang (a, n);
end.

What do character formats do for your document's message? a.set the tone b.provide organization c.provide clarity d.set how texts align with documents

The file sales data.xlsx contains monthly sales amounts for 40 sales regions. write a sub that uses a for loop to color the interior of every other row (rows 3, 5, etc.) gray. color only the data area, columns a to m. (check the file colors in excel.xlsm to find a nice color of gray.)

Need asap assignment directions: think of an organization (business, religious institution, volunteer organization, sports team) with which you have been involved. imagine outfitting it with an it infrastructure. prepare a plan for what you would do to support outfitting it. draw a map of a network connecting all the individuals, give them pcs and printers, and lay out the design as best you can. the purpose is to begin working with these concepts, not to build a perfect network.