Ответы
Гость Var
x: real;
begin
write('x = ');
readln(x);
write('y = ');
if x < 1 then
writeln(2 * x - 17)
else
if (x <= 5) then
writeln(power(x, 7))
else
writeln(x * ln(x));
end.
Нет комментариев
Список предметов
