Некоторый алфавит содержит 128 символов. Сообщение содержит 10 символов. Определите информационный объём сообщения. решите пожалуйста с

паскале исправьте ошибки пожалуйста.

program zadacha;
var a:array [1..100] of integer;
i,n,b,c:integer;
s: real;
begin
write('кол. элементов');
readln(n);
write('элементы массива');
for i:=1 to n do
readln(a[i]);
write('b=');
readln(b);
write('c=');
readln(c);
s:=sqrt(c)+sqrt(b);
n:=n+1;
for i:=n downto n+1 do
a[i]:=a[i-1];
a[n]:=s;- вот не правильно
for i:=1 to n do
write(a[i]:6)
end.

человека вводится с клавиатуры

1)1280 битов
2)70 битов
3)1280 байтов
4)70 байтов

байтов 4) 70 байтов

байтов 4) 70 байтов.

Сообщение занимает 3 страницы на странице 4 строки в строке 2 символа. Определите информационный объём сообщения,если при составлении этого сообщения использовали 128 символьный алфавит.