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

Question

Флориана

27 октября, 07:48

+5

Ответы (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.