District
6 год назад
решить этот пример в паскале
ОТВЕТЫ
Albena
Oct 24, 2020
Var
X,A:real;
Begin
Write('X = ');ReadLn(X);
Write('A = ');ReadLn(A);
WriteLn(X/(6.7*A)+(sqrt(abs(5*sqrt(X*X*X)/A))/A*A));
End.
X,A:real;
Begin
Write('X = ');ReadLn(X);
Write('A = ');ReadLn(A);
WriteLn(X/(6.7*A)+(sqrt(abs(5*sqrt(X*X*X)/A))/A*A));
End.
902
Смежные вопросы:
