Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 03.06.2016 10:32
- Информатика
- remove_red_eye 11088
- thumb_up 8
Ответы и объяснения 1
Pascal ABC.net:
Var C,D,X1,X2:real;
Begin
Write('C = ');ReadLn(C);
Write('D = ');ReadLn(D);
X1:=9+4*abs(c*d);
X2:=((3-sqrt(X1))/2);
X1:=((3+sqrt(X1))/2);
WriteLn(Abs( power(Sin(abs(C*power(X1,3)+D*sqr(X2)-C*D)),3) / sqrt(sqr(C*power(X1,3)+D*sqr(X2)-X1)+3.14) )+Tan(C*power(X1,3)+D*sqr(X2)-X1));
End.
Pascal ABC:
Var
C,D,X1,X2:real;
Begin
Write('C = ');ReadLn(C);
Write('D = ');ReadLn(D);
X1:=9+4*abs(c*d);
X2:=((3-sqrt(X1))/2);
X1:=((3+sqrt(X1))/2);
WriteLn(Abs( power(Sin(abs(C*power(X1,3)+D*sqr(X2)-C*D)),3) / sqrt(sqr(C*power(X1,3)+D*sqr(X2)-X1)+3.14) )+Sin((C*power(X1,3)+D*sqr(X2)-X1))/Cos((C*power(X1,3)+D*sqr(X2)-X1)));
End.
- 04.06.2016 05:01
- thumb_up 22
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.