Написать программу вычесления значения переменой а по формуле: а=k^2*1/2*sin(m)

Question

Написать программу вычесления значения переменой а по формуле: а=k^2*1/2*sin(m)

Comments

а угол m ? что про него сказано?

---

про него ничего сказано не было

Answer 1

Вот. Делай лучшим, если помог:) program pr; var k,m,a:real; begin write('Введите угол: '); readln(m); write('Введите коэффициент k: '); readln(k); a:=sqr(k)/2*sin(m); writeln('a=',a:0:2); end.