На отрезке [-3,14; 3,14] с шагом 0.2 протабулировать функцию: sin2(x) +

program zz1;

var x, y:real; // задаем переменные не целого типа

begin

x:=-3.14; // задаем изначальное значение для переменной х

while x lt;= 3.14 do // организуем цикл, в котором переберем все числа от начального значения х до единицы

begin

y:=sqr(sin(x)) + sqr(cos(x)); // вычисляем значение функции у по данной формуле

writeln( для , x , вычисленное значение функции y = , y:5:2); // выводим ответ в столбец в формате 5 символов для всего числа и два знака после точки

x:=x + 0.2; // увеличиваем х на шаг

end;

end.