Напишите задачу в паскаль найти объем куба

Question

Напишите задачу в паскаль
найти объем куба

Comments

Ввести длину ребра а, затем вывести значение выражения а*а*а. Вот и все...

---

я знаю формулу V=H^3, мне нужно все записать на языке паскаля

Answer 1

Var
a, v : integer;
begin
write('Введите длину ребра:');
readln(a);
v := a * a * a;
writeln;
writeln('Объем = ', v);
end.  

Comments

зачем печатать v,можно просто посчитать без печати,а потом просто вывести v на экран определив его как объём-на 1 строку меньше

---

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