Решение задачи только для ввода с клавиатуры. Языки решений: Pascal и C++. Pascal (PascalABC.Net, 3 релиз): var a:longint; begin read(a); a*=a*a; (для большинства других диалектов Pascal единственный возможный вариант это: a:=a*a*a;) writeln(a); end.
C++: #include <iostream> using namespace std; int main(){ unsigned int a; cin>>a; cout<<a*a*a; }
Решение с случайными числами: Pascal (всё тот же). const max=%максимальное_значение_ребра% var a:integer; begin randomize(); a:=random(0,max); a*=a*a;(для большинства других диалектов Pascal единственный возможный вариант это: a:=a*a*a;) end.
C++: #include <iostream> using namespace std; int main(){ unsigned int a; a=rand(); a*=a*a; cout<<a; } }