Помогите пожалуйста написать программу ( 13 вариант на фото) для турбо

Помогите пожалуйста написать программку ( 13 вариант на фото) для турбо паскаль либо желая бы на Паскаль.Очень срочно надобно!!!Заранее буду очень признателен.И желательно разъяснить как там и что выполняется.

Задать свой вопрос
Valentina Fodina
Ещё животрепещуще?
Катя Боязетова
Программка должна значение выражения считать?
Lepnev Gennadij
Толком то не объяснили,сказали написать только а откуда что брать...А если это как 2 различные программки,что при вводе переменных числились эти выражения?
1 ответ
Uses Crt;
Var A,B:real;
Begin
ClrScr;
Write('A = ');ReadLn(A);
Write('B = ');ReadLn(B);
WriteLn('y = ',(Sin(A)+Cos(2*B-A))/(Cos(A)-Sin(2*B-A)));
WriteLn('z = ',(1+Sin(2*B))/Cos(2*B));
End.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт