Дана длина ребра куба. Найти объем куба и площадь его боковой поверхности. Pascal

Question

Информатика

Матрёна

11 октября, 16:34

Дана длина ребра куба. Найти объем куба и площадь его боковой поверхности. Pascal

+4

Ответы (1)

Знаете ответ?

Петяй · Answer 1

Var a: real;

begin

write ('Введите сторону куба = ') ;

readln (a) ;

writeln ('Объем = ', a * a * a) ;

writeln ('Площадь поверхности = ', 6 * a * a) ;

end.