Question

Помогите решить программу на языке программирования Паскаль.

Не могу понять как делается помогите!

Answer 1

Ну как это делается... становимся "на уши", отыскивая в интернете пиратскую версию компилятора с языка Турбо Паскаль. Потом отыскиваем оболочку DosBox, в которую втыкаем этот самый турбопаскаль. Поскольку иначе запустить эту древность (на минуточку, это написано было в 1983 году) под Windows 7 просто не получится.

А потом пишем в нем программу. Сдавая, интересуемся у учителя, почему его уровень знаний паскаля остался в 1983 году, когда на дворе скоро 2020-й.

program OakHead;

uses Crt;

var

   x, y, a, b : real;

 

begin

   write('Vvedi a, b, x: ');

   read(a, b, x);

   y := sqrt(abs(x*(a*a+b*b)))/(exp(x)*sin(sqrt(abs(a+b))));

   writeln(y);

   readkey;

end.