Ввести два целых числа: X и Y. Вычислить выражение Y = sin x2 +

+ cos x2, если число X меньше либо равно 3, иначе вычислить остаток от деления X на 3.

Question

Любомысл

8 сентября, 03:54

+4

Ответы (1)

Знаете ответ на вопрос?

Альберта · Answer 1

Var

x: integer;

y:real;

begin

read (x, y) ;

y : = sin (2 * x) + cos (2 * x) ;

if x > 3 then

writeln (x mod 3)

else

writeln (y) ;

end.

Ввести два целых числа: X и Y. Вычислить выражение Y = sin x2 ++ cos x2, если число X меньше либо равно 3, иначе вычислить остаток от деления X на 3.