Предмет: Информатика,
автор: kuiju
1)заданы значения x y z составить программу которая находит сумму кубов модулей этих чисел
2)задано двухзначное число составить программу с помощью которой определите сумму кубов цифр этого числа
Ответы
Автор ответа:
0
Смог решить только вторую:
program primer2;
var x,o,c:integer;
a,b,sum:real;
Begin
readln(x);
c := x div 10;
o := x mod 10;
a := exp(3*ln(c));
b := exp(3*ln(o));
sum := a+b;
writeln(sum:8:3);
end.
Похожие вопросы
Предмет: Физика,
автор: dilnaz5993
Предмет: Алгебра,
автор: prokopenkovitala20
Предмет: Математика,
автор: tolegeninzu869
Предмет: Литература,
автор: rjkz1999
Предмет: Биология,
автор: nastasia16