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

Question

Информатика

Матильда

2 ноября, 16:48

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

+1

Ответы (1)

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

Доминика · Answer 1

Var

a, s, v:integer;

begin

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

readln (a) ;

s:=6*a*a;

v:=a*a*a;

writeln ('объем равен ', v) ;

writeln ('площадь', s) ;

readln;

end.