дана функция y=3x^2+1,5 х меняется от 1 до 20 написать программу по паскалю вычислить значение функции в обратном порядке

Question

Василиса

25 мая, 11:50

+2

Ответы (1)

Знаете ответ?

Алексеич · Answer 1

Program Func;

var i: integer;

y:real;

begin

for i:=20 downto 1 do

begin

y:=3 * (i*i) + 1.5;

writeln ('Значение функции:', y:2:2) ;

end;

end.