<span>1 ГБ = 1024 МБ
1 МБ = 1024 КБ
1 КБ = 1024 Байт
1 Байт = 8 Бит
</span><span>6291456 Кб = </span>6.2915 Гб
<span>536870912 Б = 0.5369 ГБ</span>
<span><span>
</span>
</span>
Вот так нужно? Составить программу только так могу.
716 - 512 = 204 1
204- 128=76 1
76 - 64 =12 1 от 12 нельзя отнять следующую степень двойки - 32, поэтому в нашем двоичном числе на месте этого разряда будет 0, и 16 от 12 отнять нельзя, значит снова 0.
12- 8 =4 1,
4 - 4 = 0 1 , а дальше все оставшиеся разряды нули. В разряде двоек - 0, в разряде единиц тоже 0. Итого. 111001100 наше двоичное число.
Var a, b : real;
begin
write('Сторона A = ');
readln(a);
write('Сторона B = ');
readln(b);
writeln('S= ',a*b);
a:=a+b;
a:=a*2;
writeln('P= ',a);
end.
ТОЛЬКО ВВОДИТЕ ДРОБНЫЕ ЧИСЛА С ТОЧКОЙ (НАПРИМЕР 5.5), ИНАЧЕ БУДЕТ ВЫДАВАТЬ ОШИБКУ