1 байт = 8 битам, тогда 520/8=65 байт
2ⁿ = 65536, где n = 16
I = 1024 · 800 · 16 = 13107200 бит =
13107200 / 8 Байт =
1638400 / 1024 Килобайт =
1600 / 1024 Мегабайт = 1.56 Мегабайт
Иван может купить видеокарты с памятью 1.5, 2 и 4 Мбайт.
<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (s1, s2) := ReadReal2('Введите площади кругов:');
Println('Площадь прямоугольника равна ', 2 * Max(s1, s2) / Pi)
end.
<h3>Введите площади кругов: 46.13 41.52</h3><h3>Площадь прямоугольника равна 29.3672700993165 </h3>
1) 1 байт- 8 битов
2) 213 бит - 0,0266 кбайт
3) 1 мбайт - 1 х 10 < -2, 0,001 байт, 0,08 бита.
4) 1,536 кбайт, 1536 байт = 12.288 бит.
Var a:array [1..10] of integer;
i,k1,k2:integer;
begin
for i:= 1 to 10 do
a[i]:= Random(20,100);
writeln(a);
for i:=1 to 10 do
if a[i] mod 2 = 0 then k1:=k1+1
else k2:=k2+1;
writeln('Чётных элементов: ',k1);
writeln('Нечётных элементов: ',k2)
end.