семиклассник Иван пришел из школы домой и решил скачать сети интернет 2 обучающие программы он посмотрел размеры программы первая была объёмом 100 КБ А 2 100 ГБ Иван решил сначала скачать первую программу а затем же сразу же вторую программу в процессе скачивания Когда уже скачалась первая программа и половина 2 программы произошёл сбой и пришлось вторую программу скачивать сначала сколько секунд потратил Иван на то чтобы скачать копию программы если скорость приема данных на его компьютере было 2930 бит в секунду а сбой не отнял ни одной лишней секунды

Для перевода нужно умножить содержимое каждого разряда на его "вес" и результаты сложить.
Начнём с первого разряда, в числе он расположен справа, и его "вес" равен 2 в нулевой степени ( 2^0 = 1 ) и далее будем двигаться к старшему разряду:

1*2^0 +0*2^1 +1*2^2 +0*2^3 +1*2^4 +0*2^5 +1*2^6 +0*2^7 +1*2^8 =
1*1 +0*2 +1*4 +0*8 +1*16 +0*32 +1*64 +0*128 +1*256 =
1 + 4 + 16 + 64 + 256 = 341

(здесь приведён полный расчёт, брались даже разряды в которых находятся нули; на практике разряды с нулями конечно можно не брать в расчёт, но при этом не перепутайте "вес" разрядов- он зависит от номера конкретного разряда).

procedure Polar(x, y: real; var r, f: real);
begin
  r := sqrt(sqr(x) + sqr(y));
  if x = 0 then
    if y = 0 then f := 0
    else
    if y > 0 then f := Pi / 2 else f := -Pi / 2
  else begin
    f := arctan(y / x);
    if x < 0 then
      if y >= 0 then f := f + Pi else f := f - Pi
  end
end;

{ тестовое решение }
var
  R, Fi: real;

begin
  Polar(1, 1, R, Fi);
  Writeln('(+1;+1) -> (', R, ';', Fi, ')');
  Polar(1, -1, R, Fi);
  Writeln('(+1;-1) -> (', R, ';', Fi, ')');
  Polar(-1, 1, R, Fi);
  Writeln('(-1;+1) -> (', R, ';', Fi, ')');
  Polar(-1, -1, R, Fi);
  Writeln('(-1;-1) -> (', R, ';', Fi, ')');
  Polar(0, 1, R, Fi);
  Writeln('(0;+1)  -> (', R, ';', Fi, ')');
  Polar(0, -1, R, Fi);
  Writeln('(0;-1)  -> (', R, ';', Fi, ')');
  Polar(0, 0, R, Fi);
  Writeln('(0;0)   -> (', R, ';', Fi, ')');
end.

Тестовое решение:

(+1;+1) -> (1.4142135623731;0.785398163397448)
(+1;-1) -> (1.4142135623731;-0.785398163397448)
(-1;+1) -> (1.4142135623731;2.35619449019234)
(-1;-1) -> (1.4142135623731;-2.35619449019234)
(0;+1)  -> (1;1.5707963267949)
(0;-1)  -> (1;-1.5707963267949)
(0;0)   -> (0;0)