Паскаль/ 9 класс представьте данное число n в виде суммы двух кубов. входные данные программа получает на вход одно натуральное число n(n < = 1028). выходные данные программа должна вывести 2 целых неотрицательных числа, сумма кубов которых равна n. если это невозможно, выведите строку impossible.

//pascalabc.net 3.2 сборка 1318 var   n,i,j,resi,resj,flag: integer; begin flag: =0; i: =1; readln(n); while power(i,3)< n do   begin     j: =1;     while power(j,3)+power(i,3)< =n do       begin         if power(j,3)+power(i,3)=n then         begin           flag: =1;           resi: =i;           resj: =j;           break;         end;         inc(j);       end;     if flag=1 then break;     inc(i);   end; if flag=1 then writeln(resi,' ',resj,' ',resj,' ',resi) else writeln('impossible'); end. пример ввода: 1008                             //2^3+10^3 пример вывода: 2 10 10 2

Var   n,i,j: integer;   fexit: boolean; begin   read(n);   fexit: =false;   for i: =1 to 10 do begin       for j: =1 to 10 do           if i*i*i+j*j*j=n then begin fexit: =true; break end;       if fexit then break       end;   if fexit then writeln(i,' ',j)   else writeln('impossible') end. пример выполнения 637 5 8

200: 2

100|0

50|0

25|0

12|1

6|0

3|0

1|1

0|1

 

200₁₀=11001000₂

 

489: 2

244|1

122|0

61|0

30|1

15|0

7|1

3|1

1|1

0|1

 

489₁₀=111101001₂

 

543: 2

271|1

135|1

67|1

33|1

16|1

8|0

4|0

2|0

1|0

0|1

 

543₁₀=1000011111₂

 

950: 2

475|0

237|1

118|1

59|0

29|1

14|1

7|0

3|1

1|1

0|1

 

950₁₀=1110110110

 

1025: 2

512|1

256|0

128|0

64|0

32|0

16|0

8|0

4|0

2|0

1|0

0|1

 

1025₁₀=10000000001₂

 

 

 

1. 0,25 кбайт=256 байт = 2048 бит

2. каждый символ - 8 бит

3. 2048/8=256 символов