(35 ) доработать программу на pascal так, чтобы она выполняла вычисления 3 раза с разными исходными данными, используя оператор цикла for.

var x,f: real;
begin
write('введите значение x= ');
readln(x);
if x> 3 then f: =-3*x+9 else f: =sqr(x)*x/(sqr(x)+8);
writeln('f(',x: 5: 3,')= ', f: 5: 3);
end.

fokslov69    1   25.10.2019 21:52    0