Var
a:real;
begin
Write('a='); Read(a);
Write('Кв. корень из куба этого числа равен ',Sqrt(a*a*a):0:3)
end.
Пример решения
a=13.68
Кв. корень из куба этого числа равен 50.598
var
a,b:real;
begin
Write('a='); Read(a);
Write('b='); Read(b);
Write('Произведение этих чисел равно ',a*b:0:2)
end.
Пример решения
a=-13.452334521
b=180
Произведение этих чисел равно -2421.42