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

varx: integer;y:real;beginread(x, y);y := sin(2 * x) + cos(2 * x);if x > 3 thenwriteln(x mod 3)elsewriteln(y);end.