Question

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

Answer 1

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

Answer 2

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

Answer 3

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