Вычислить значение выражения - Pascal ABC (14517)
Формулировка задачи:
Вычислить значения переменных:
если m=14,1; g=-3,33E+2
Решение задачи: «Вычислить значение выражения»
textual
Листинг программы
const m=14; g=-3.33e+2; var t1,t2,t3,x,y:real; begin x:=(m+g-sqrt(m*m+1))/(sqr(sin(m))-14)+sqr(cos(g)); y:=5*abs(x)-(m*m+exp(ln(10)*cos(g))); write('y=',y:0:3,' x=',x:0:3); end.
Объяснение кода листинга программы
- const m=14; - объявляется константа m равная 14.
- g=-3.33e+2; - объявляется переменная g и ей присваивается значение -3.33e+2.
- var t1,t2,t3,x,y:real; - объявляются переменные t1,t2,t3,x,y типа real.
- begin - начинается блок кода.
- x:=(m+g-sqrt(m*m+1))/(sqr(sin(m))-14)+sqr(cos(g)); - вычисляется значение переменной x по формуле из задания.
- y:=5abs(x)-(mm+exp(ln(10)*cos(g))); - вычисляется значение переменной y по формуле из задания.
- write('y=',y:0:3,' x=',x:0:3); - выводится значение переменной y и x на экран.
- end.; - заканчивается блок кода.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д