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*
Комментарий*

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

gubernatorov00
dawlatowajana
konstantinslivkov
mshelen732
olga0909196323
expo3217
ekkim310
Баранов276
Okunev1034
Golovinskii_Sirotkina1944
fastprofit
beliaeva2
Горностаева831
lele52
галина