И че дальше я не понял задание
Переведем в начале 2^32 бит в байты.
В 1 байте 2^3 бит
следовательно
2^32 (бит)=2^32*2^(-3)=2^29 (байт)
В 1 Кбайте =1024 байт=2^10 байт
следовательно
2^29(байт)=2^29*2^(-10)=2^19 (Кбайт)
В 1Мбайте =1024 Кбайт
Следовательно
2^19(Кбайт)=2^19*2(-10)=2^9 =512 (Мбайт)
Ответ 512 (Мбайт)
Program math;var a: real;var i,n: integer;begina:=1;readln(n);for i:=1 to n dobegin a:=a+(1/i);end;writeln(a);end.
Const N = 10;
var A: array[1..10] of integer;
i, len: integer;
s: string;
begin
write('Введите слово: ');
readln(s);
len := length(s);
for i := 1 to len do begin
A[ i ] := ord(s[i]);
writeln('Код символа ', s[ i ], ': ', A[ i ]);
end;
<span>end.</span>