Ответы
Ответ дал:
0
program abc;
var x,y:real;
begin
readln(x);
if x <= 0 then
begin
y:=x+4;
end;
if (x < 0) and (x <= 7.5) then
begin
y:=x*x+3;
end;
if x > 7.5 then
begin
y:=x+((sqrt(x))/2);
end;
writeln(y);
end.
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад