Пожаловаться
- 22.05.2018 21:23
- Информатика
- remove_red_eye 18613
- thumb_up 29
Ответы и объяснения 2
Var x,y:real;
begin
readln(x);
y:=1/sqrt(x)+ln(abs(0.2+sin(x)))*power(x*x,1/3);
writeln(y:6:4);
end.
Пример:
2.5
0.2179
begin
readln(x);
y:=1/sqrt(x)+ln(abs(0.2+sin(x)))*power(x*x,1/3);
writeln(y:6:4);
end.
Пример:
2.5
0.2179
Пожаловаться
- 23.05.2018 13:39
- thumb_up 23
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadReal('x=');
Writeln(1/Sqrt(x)+Sqr(Ln(Abs(0.2+Sin(x))))*x**(2/3))
end.
Пример
x= 2.163
0.681375656936723
Контрольный пример-подтверждение приведен во вложении.
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadReal('x=');
Writeln(1/Sqrt(x)+Sqr(Ln(Abs(0.2+Sin(x))))*x**(2/3))
end.
Пример
x= 2.163
0.681375656936723
Контрольный пример-подтверждение приведен во вложении.
Пожаловаться
- 24.05.2018 07:46
- thumb_up 24
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы