Составить программу для вычисления выражения: а) [latex]y = c+d - tg(x) : !x! + d [/latex] при x = 2.36, c = 18.7, d = 6.46б) [latex] a = 5.23+7.6в+sin(п:7) : sin(2п:7)+3,1[/latex] Если знаменатель равен нулю,на экран нужно выд...
Составить программу для вычисления выражения: а) [latex]y = c+d - tg(x) : !x! + d [/latex] при x = 2.36, c = 18.7, d = 6.46
б) [latex] a = 5.23+7.6в+sin(п:7) : sin(2п:7)+3,1[/latex]
Если знаменатель равен нулю,на экран нужно выдавать сообщение об ошибке.
P.S. Там где двоеточия - дробь,там где восклицательные знаки - модуль,и в выражений б) sin(п:7),и в Sin(2п:7) )))
Ответ(ы) на вопрос:
Program kyt333;
uses crt;
const
c=18.7;
d=6.46;
var
x,y,a:real;
begin
write('Введите х: '); readln(x);
writeln();
if (abs(x)+d = 0) or (cos(x)=0) then writeln('Знаменатель равен нулю!')
else
begin
y:=(c+d-sin(x)/cos(x))/(abs(x)+d);
a:=5.23+7.6*7.6+sin(pi/7)/sin(2*pi/7)+3.1;
end;
writeln('Результаты:');
writeln('y=',y:8:2); writeln('a=',a:8:2);
end.
Не нашли ответ?
Похожие вопросы