Ответы
Ответ дал:
0
Var a:real;
Begin
Write('Введите длину ребра куба: ');ReadLn(a);
Write('Объём куба равен: ',a*a*a);
End.
Begin
Write('Введите длину ребра куба: ');ReadLn(a);
Write('Объём куба равен: ',a*a*a);
End.
Вас заинтересует
1 год назад
5 лет назад
5 лет назад
8 лет назад
9 лет назад