Распечатать 6 значений : x,y y=3*cosx/3 где x изменяется от -3πс шагом 0.8 составить программу(pascal)

269

401

Посмотреть ответы 2

Ответы на вопрос:

orlovs2017

Информатика

4,4(89 оценок)

Var x: real; i: integer; begin x: =-3*pi; for i: =1 to 6 do begin writeln(x: 9: 6,3*cos(x/3): 16: 6); x: =x+0.8 end end. результат -9.424778 -3.000000 -8.624778 -2.893964 -7.824778 -2.583352 -7.024778 -2.090120 -6.224778 -1.449137 -5.424778 -0.705713