Question

Срочно, пожалуйста, информатика.

Напишите программу, вычисляющую значение функции (на фото)

Тема: условный алгоритм

Answer 1

var
  a,b,y:real;
begin
  Read(a,b);
  if a>1 then y:=a+b else y:=a-b;
  Writeln(y)
end.

var
  x,b,y:real;
begin
  Read(b,x);
  if x<100 then y:=b*b-Abs(x)
  else y:=x*Sqr(Sqr(x))-3*b;
  Writeln(y)
end.