Вычислить значения функции y=cos3x+7 на отрезке от 9 до 25 с шагом 1. Полученные значения функции записать в массив и вывести на экран. паскаль
Вычислить значения функции y=cos3x+7 на отрезке от 9 до 25 с шагом 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.
Не нашли ответ?
Похожие вопросы