Составить программу ** языке Паскаль для вычисления и печати таблицы значений функции...

Question

Составить программу на языке Паскаль для вычисления и печати таблицы значений функции Y=sin2(x-1)+2cos((x-1)/2), при условии, что X0=0.3, Xк=1.7, DX=0.2.

Comments

sin2(x-1) - это sin(2(x-1)) или квадрат синуса (x-1) ?

---

Запись sin2(x-1) некорректна, потому что допускает разночтения.

Answer 1

// PascalABC.Net v2.2 build 1019
program znanija_12709887;

const  
  xMin = 0.3; 
  xMax = 1.7;   
  xStep = 0.2;
var  
  y : real; 
  x : real;
begin 
  x := xMin; 
  while x <= xMax do begin    <br>    y := sin(2)*(x - 1) + 2 * cos((x - 1) / 2);   
    writeln ('x = ' , x, ' y = ', y);   
    x := x + xStep; 
  end;  
end.