ТутРешу.Ру

Дана функция y=3x^2+1…

Задание:

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

Решение:

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.




Знаете другой ответ?

Отправить свой ответ