Question

Срочно нужна помощь! Программа в Паскаль

Answer 1

приводим уравнение к виду:

$a=frac{4cos(x-pi/6)}{2-cos(2y)}$

считаем:

var

   x, y, z, a, b : real;

   

begin

   writeln('Введите:');

   write('x=');

   readln(x);

   write('y=');

   readln(y);

   write('z=');

   readln(z);

   a := (4*cos(x-pi/6))/(2-cos(2*y));

   b := 1+sqr(z)/(3+sqr(z)/5);

   writeln('a=', a:0:2);

   writeln('b=', b:0:2);

end.

если я не накосячил с расчетами то должно быть как то так.

Answer 2

но... при форматном выводе не идет округление, поэтому в последнем знаке могут быть отличия

Answer 3

Все еще выдает синтаксическую ошибку "Syntax error, ";" expected but "," found"

Answer 4

тестировал тут https://rextester.com/l/pascal_online_compiler у меня работает

Answer 5

Так и тут же. Сейчас закрыл и снова открыл-работает.Извините,наверное какой-то глюк случился. Спасибо большое вам всем!)

Answer 6

всегда пожалуйста