В двоичной записи три нуля.
47 Кб = 48128 Байт
2 Мб = 2097152 Байт
30 Кб = 245760 Бит
Program kolco;
var t,d:integer;
S:real;
begin
writeln ('Введите толщину кольца');
readln (t);
writeln ('Введите диаметр внутреннего круга кольца');
readln (d);
S:=pi*sqr(t+d/2)-pi*sqr(d/2);
write ('Площадь кольца равна ',S,' сантиметров квадратных');
end.
22байта=176бит
15кбайта=117760байт
156=163577856байт