Ответы
Ответ дал:
0
var
a,x:real;
begin
writeln('Введите x');
readln(x);
a:=sqrt((sqr(x)+2*x+3)/3*x);
writeln('ответ а = ',a);
end.
Var x: integer;
Begin
Writeln ('введите значение стороны для куба');
Readln (x);
Writeln ('Объем куба равен: ', sqr(x)*x);
End.
a,x:real;
begin
writeln('Введите x');
readln(x);
a:=sqrt((sqr(x)+2*x+3)/3*x);
writeln('ответ а = ',a);
end.
Var x: integer;
Begin
Writeln ('введите значение стороны для куба');
Readln (x);
Writeln ('Объем куба равен: ', sqr(x)*x);
End.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
9 лет назад