Ответ(ы) на вопрос:
var
a, v : integer;
begin
write('Введите длину ребра:');
readln(a);
v := a * a * a;
writeln;
writeln('Объем = ', v);
end.
Не нашли ответ?
Похожие вопросы