Правильно решил ?????????

Program pr_1;
var a:array [1..n] of integer;
i, c, n:integer;
begin
readln(n)
for i:=1 to n do
begin
a[i] := random(150, 180);
c := c + a[i];
end;
writeln(c / n);
end.

Чтобы посчитать количество информации нужно 
1.умножить 16 бит (1 символ) на кол-во символов на одну строку
16*64=1024 бит
2.умножить информацию одной строки на количество строк на странице
1024*56=57344 бит
3.умножить информацию одной страницы на количество страниц
57344*1024=58720256 бит
4.поделить это число (объем документа в битах) на 8 тем самым переводя его в байты 
58720256/8=7340032 байт
5.поделить это число на 1024 переводя его в килобайты
7340032/1024=7168 Кбайт
5 поделить еще раз на 1024 преводя файл в мегабайты
7168/1024=7
Ответ:7 Мбайт или номер 4

Папка это когда что там хранишь
файл это то что хранится в папке
файл отличается тем что он не хранит в себе нечего
а папка может хранить все что угодно

Запиши нормально задание