1) Дана длина ребра куба. Найти объем куба. Длину ребра куба ввести с клавиатуры или задать с помощью генератора случайных чисел. Вывести на экран изображение куба и результаты вычислений.

Решение задачи только для ввода с клавиатуры. Языки решений: Pascal и C++. Pascal (PascalABC.Net, 3 релиз):var a:longint; beginread(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;beginrandomize();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;}}