1) 512 бит = 512/8 = 64 байт
4 ГБ = 4*1024 = 4096 МБ
2048 бит = 2048/8/1024 = 0,25 Кб
1/128 Кб = 1024/128 = 8 байт
2) 80 Кб = 80*1024*8 = 655 360 бит
256*64*16 = 262 144 символов всего
655 360 / 262 144 = 2,5 бит = округлим до 3
2^3 = 8 символов
3) 32 Кб = 32*1024*8 = 262 144 бит
8 = 2^3 -> отсюда берем 3 (разряд в двоичной системе счисления)
28*24*3 = 2016
262144/2016 = 130 страниц
Остальные не знаю
Ответ такой: 137 восьмеричной системе счисления
8)
var
f_tmp, f1, f, sum: integer;
i, n: byte;
begin
readln(n);
f_tmp := 0;
f1 := 1;
if n = 0 then sum := 0
else sum := 1;
for i := 2 to n do
begin
f := f1 + f_tmp;
sum := sum + f;
f_tmp := f1;
f1 := f
end;
writeln('Сумма ', n , ' чисел = ',sum);
readln;
end.
9)
const n = 5;
var
A: array [1 .. 10, 1 .. 10] of integer;
i, j, s, w, k, q: integer;
begin
for i := 1 to n do
for j := 1 to n do
begin
write('A[', j, ',', i, '] = ');
readln(A[j, i]);
end;
s := 0;
for i := 1 to n do s := s + A[1, i];
k := 1;
for i := 1 to n do
begin
w := 0; q := 0;
for j := 1 to n do
begin
w := w + A[j, i];
q := q + A[i, j];
end;
if (s <> w) or (q <> s) then
k := 0;
end;
if k = 0 then write('Квадрат не магический')
else write('Квадрат магический');
readln;
end.
Program n1;
var a,b: real;
begin
readln(a,b);
writeln('S=',a*b);
write('P=',(a+b)*2);
end.