Yekaterina358
?>

Информатика 9 класс, не могу понять задачи, какие формулы нужно подобрать и как решить

Информатика

Ответы

hrviko

var

 A, B, c, x, p1, p2 :double;

const

 PI = 3.1415926;

begin

 readln(A, B, c, x);

 if exp(c+power(x,0.2)) <> 0 then

   p2 := 32.7*power(A,3)*x/exp(c+power(x,0.2))

 else begin

   writeln('Деление на 0 во второй дроби');

   halt;

 end;

 

 if (abs(0.65 * A * PI * Power(x,3))<> 2*PI) then

   p1 := tan(0.65 * A * PI * Power(x,3))

 else begin

   writeln('Аргумент для тангенса неверен');

   halt;

 end;

 

 if (p1 < 0) then begin

   writeln('Отрицательное подкоренное выражение');

   halt;

 end

 else

   if(p1 = 0) then begin

     writeln('Деление на 0 в первой дроби');

     halt;

   end;

   

 writeln('Результат: ', (B * cos(x)*cos(x))/sqrt(p1)+p2);

end.

Объяснение:


Составить блок схему алгоритма и программу для вычисления функции по формуле, для произвольных исход

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Информатика 9 класс, не могу понять задачи, какие формулы нужно подобрать и как решить
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

bieku68
antilopa001
rebet61
v-zhigulin1
maruska90
МАМОНОВА-андрей
verkop9
dakimov
zharovaleks
askorikova
ganul
Ваган Шутова332
vodexshop2
Энверович
irschacha