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.
Объяснение:
задача
сегодня Вася среди старых вещей нашёл магическую шляпу и инструкцию по созданию шариков с её .исходно шляпа пустая. В инструкции описаны 3 заклинания,позволяющие провести ритуал. У заклинаний след эффекты:
1-увеличение шариков в шляпе на 1
2-увеличение количества шариков в шляпе в 2 раза
3-увеличение количества шариков в шляпе в 3 раза
магический ритуалом называется некоторая последовательность заклинаний применяемых подряд. В течении одного магического ритуалов можно менять содержимое шляпы только с заклинаний ,то есть нельзя в середине ритуалов убрать или добавить в шляпу шарики без использования заклинаний .Вася начинающий волшебник,поэтому он может провести ритуал не более одного магического ритуала в день .
