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

219

233

Посмотреть ответы 3

Ответы на вопрос:

хорошист55007

Информатика

4,8(59 оценок)

//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

agzamov03

Информатика

4,8(32 оценок)

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

alina97531

Информатика

4,7(44 оценок)

Программа для введённого с клавиатуры числа n выводит число, составленное из нечётных цифр десятичной записи числа n. если в записи n нет ни одной нечётной цифры, выводится 0. если n < 0, выводится что-то жуткое. st - в любой момент степень 10, пусть st = 10^k. тогда n mod (st * 10) div st получает (k + 1)-ую цифру справа в десятичной записи числа n. затем, если она чётная, то вместо n рассматривается число n div (st * 10) * st + n mod st - число, получаемое из n вычитанием (k + 1)-й цифры. если нечетное - берется следующее k.например, для n = 1234567 будет выведено "ответ: 1357", а для n = 24680 будет выведено "ответ: 0".