Помогите пожалуйста написать функцию в паскале y=(x+a)^2, если x не равно b x+exp(b),...

0 голосов
36 просмотров

Помогите пожалуйста написать функцию в паскале

y=(x+a)^2, если x не равно b
x+exp(b), если х=b

(как должно быть)

Рrogram pr2;
uses crt;
var x,a,y : real;
begin
clrscr;
write(‘ введите х,а’); read(x,a);
if x>=a then y:=sin(x)+exp(a)
else y:=sqrt(x*x+a*a)-5*a;
write(‘ y=’,y);
end.


Информатика (12 баллов) | 36 просмотров
Дан 1 ответ
0 голосов

If x<>b then y = (x+a)^2;
else y = x +exp(b);

(1.0k баллов)