Itranslateтакая программка Где вы можете переводить слова
Не сказанно сколько см юля но ведь девушки не выростают до токого размера
Для того, чтобы сравнить две величины, поставим их в один ряд, переведем байты в Мбайты, либо Мбайты в байты, как вам удобнее
1 Мбайт = <span>1048576 Байт
140192 байта - 0,13 Мбайт
Соответственно 1 Мбайт > </span>140192 байта
N=32 N = 2 (в степени i) i = 5
iс=i * K
iс = 5 * 256 = 1280 бит :8 = 160 байт на одном носителе
iс= 256 * 512 * 5=655 360 бит :8 = 81 920 байт :1024 = 80 Кбайт на всем
Var a : integer;
begin
repeat
a:=a+100;
writeln(a*0.3, ' руб за ', a, ' гр')
until a = 1000
end.