Нужно 64 умножить на 128 и опять умножить на. 256= х байт дальше разберетесь сами
Если вам нужно составить программу, то вот:
program znanija;
var
r,d: integer;
begin
r := 2;
d := r*2;
writeln('Диаметр окружности = ',d)
end.
50(в 10)=110010 (в 2): делим 50 на 2 столбиком и записываем остаток в обратно порядке:
50/2=25 (ост. 0)
25/2=12 (ост 1)
12/2=6 (ост 0)
6/2=3 (ост 0)
3/2=1 (ост 1)
1/2=... (ост 1), переписываем в обратно порядке остатки
Var a: ineger;
begin
write('Введите возраст: ');
read(a);
if a>=18 then writeln('Это ребенок');
else writeln('Это взрослый');
end.
сервер))) єто правильный ответ потому что у нас это сегодня было