Используя таблицы триада и тетрада переведем числа в двоичное число:
4(сс) = ######11##11
8(cc) = ##101###011
16(cc) = 101########
Теперь совместим ответы и получим:
10101110011
0,64 Кб. Если что, а если с делением то я хз(
Перемножаем всё.
512 * 64 * 64 * 16 = 33 554 432 бита.
Чтобы перевести в мегабайты, надо разделить на <span>8388608 и получаем примерно 400 мегабайт.</span>
1-10км
2 день- (10*0.1)+10=11
3 день-(11*0.1)+11=12.1
4 день-(12.1*0.1)+12.1=13.31
и т.д
program asd;
uses crt;
var
i:integer;
a: array[1..9] of integer;
naibnum:integer;
naib:integer;
naim:integer;
naimnum:integer;
begin
writeln('Вводите цифры');
for i:=1 to 9 do
begin
readln(a[i]);
if i = 1 then naim:=a[i];
if i = 1 then naib:=a[i];
if a[i] < naim then
begin
naim:=a[i];
naimnum:=i;
end;
if a[i] > naib then
begin
naib:=a[i];
naibnum:=i;
end;
end;
writeln('Наименьшее:',naim, ' номер:', naimnum);
writeln('Наибольшее:',naib, ' номер:', naibnum);
end.