Ответы
Ответ дал:
0
var b, y:real;
begin
writeln("введите B);
readln(b)
if b < 0 then y := sqr(3 * b + 1);
else y = y:=sqrt(b);
writeln(b);
end.
begin
writeln("введите B);
readln(b)
if b < 0 then y := sqr(3 * b + 1);
else y = y:=sqrt(b);
writeln(b);
end.
Вас заинтересует
1 год назад
1 год назад
5 лет назад
5 лет назад
8 лет назад
8 лет назад
8 лет назад