Ответы
Ответ дал:
0
var
x, y: real;
begin
readln(x);
if x > 0 then
y := sqrt(x + 1)
else y := 3 * x * x + 4 * x - 5;
writeln(y);
end.
x, y: real;
begin
readln(x);
if x > 0 then
y := sqrt(x + 1)
else y := 3 * x * x + 4 * x - 5;
writeln(y);
end.
Ответ дал:
0
удаляйте если что, не заметила что нет приписки сделать один номер
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад