Есть ответ 👍

Ввести x, если x< =0, то y=(sin((x), иначе y= 5x^2-(sin^2(x))

192
386
Посмотреть ответы 3

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


Программа в pascal,abc,net var   x,y: real; begin   write('введите х: '); readln(x);   if x< =0 then y: =sin(x)-cos(x)   else y: =5*sqr(x)-sqr(sin(x));   writeln('y=',y) end. тестовое решение: введите х: 0.137 y=0.0751931316536888
alinka393
4,7(22 оценок)

Var x,  y: real;   begin write ('введите х: '); readln (x); if x< =0 theny: =sin(x) - cos(x)elsey: =5*x*x-2*sin(x)*sin(x)write(y); readln  end.

3

Объяснение:

при первом проходе а=40

при втором a=80

при третьем a= 160 и уже в цикл не входит т.к. условие a<=100 не выполняется

Популярно: Информатика