profile
Опубликовано 6 лет назад по предмету Информатика от anpopova23

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

  1. Ответ
    Ответ дан DagotPavel
    // 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   
        y := sin(2)*(x - 1) + 2 * cos((x - 1) / 2);   
        writeln ('x = ' , x, ' y = ', y);   
        x := x + xStep; 
      end;  
    end.
Самые новые вопросы