Вывести все положительные значения y.если y=cos(x)-sin(x) - вопрос №5585041 от Den4ik2008228 11.05.2020 21:50

Question

Информатика: Вывести все положительные значения y.если y=cos(x)-sin(x)

Den4ik2008228 · Answer

Program a;vary:real;i,x,n :integer;beginwriteln ('Введите значение x');readln(x);writeln ('Введите количество повторений подсчета формулы');readln (n);
for x:=1 to n dobeginy := Cos(x) - Sin(x);if (y>0) Then Writeln(y);end;end.