
Пожалуйста HELP!SoS. Нужна программа по нахождению объёма куба в Pascal ABC

Var a,b: integer;
begin
write(введите три грани куба : );
readln(a);
b:=a*a*a;
writeln(объём куба,b);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var a,b: integer;
begin
write(введите три грани куба : );
readln(a);
b:=a*a*a;
writeln(объём куба,b);
end.