Вычислить значения функции y=cos3x+7 на отрезке от 9 до 25 с шагом 1. Полученные значения функции записать в массив и вывести на экран. паскаль

Question

Информатика

Панюля

29 марта, 14:01

Вычислить значения функции y=cos3x+7 на отрезке от 9 до 25 с шагом 1. Полученные значения функции записать в массив и вывести на экран. паскаль

+3

Ответы (1)

Знаете ответ на вопрос?

Таися · Answer 1

Var

x, y:real;

i:integer;

F:Array [9 ... 25] of real;

begin

For i:=9 to 25 do begin

F[i]:=Cos (3*i) + 7;

Write (' Y = ', F[i]:0:3) ;

end;

end.