Создание программы для вычисления примеров - Turbo Pascal (33486)
Формулировка задачи:
1) 3/2 * arcsin 0.6 + 3.12 + lg4
2) {e^arctg 7,58 - 1/√2 * 1,5^2}
3) (17*e^-2 - 1/3 * PI)^4
4) |12*PI+cos40°/2*e^-3|+10
5) [3/12*(5*ln2+7*ln5)^2]
6) (3,8*PI-5)^e^2
Вот ссылка
Решение задачи: «Создание программы для вычисления примеров»
textual
Листинг программы
uses crt; begin clrscr; writeln('1. ',3/2*arctan(0.6/sqrt(1-0.36))+3.12+ln(4)/ln(10):12:4); writeln('2. ',exp(arctan(7.58))-1/sqrt(2)*sqr(1.5):12:4); writeln('3. ',sqr(sqr(17*exp(-2)-pi/3)):12:4); writeln('4. ',(12*pi+cos(40*pi/180))/2/exp(-3)+10:12:4); writeln('5. ',3*sqr(5*ln(2)+7*ln(5))/12:12:4); writeln('6. ',exp(ln(3.8*pi-5)*exp(2)):12:4); readln end.
Объяснение кода листинга программы
- Вычисляется арктангенс от 0.6/sqrt(1-0.36), затем к полученному значению прибавляются 3.12 и логарифм 4/10 по основанию 10. Результат выводится на экран.
- Вычисляется экспонента от арктангенса 7.58, затем от этого значения вычитается 1/sqrt(2)*sqr(1.5). Результат выводится на экран.
- Вычисляется квадрат от (17*exp(-2)-pi/3), затем полученное значение выводится на экран.
- Вычисляется косинус от 40pi/180, затем от этого значения вычитается 12pi и результат умножается на cos(40*pi/180). Полученное значение делится на 2/exp(-3) и к результату прибавляется 10. Результат выводится на экран.
- Вычисляется квадрат от (5ln(2)+7ln(5)), затем полученное значение выводится на экран.
- Вычисляется экспонента от ln(3.8pi-5)exp(2), затем полученное значение выводится на экран.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д