var
i, n, y: integer;
begin
write ('x= ');
readln (x);
if (x>0) then
y:=sin(2*x)
else
y:=1-(2*(sin(2*x)));
write(y);
end;
Ответ:
30 различных команд можно передать с помощью 5 лампочек
Объяснение:
(10) 30 => (2) 11110
www.youtube.c om/ wat ch?v = LCKLxn PGtyU
Пробелы убери
1)2
2)4
3)4
4)1
5) 2
оказывается необходимо минимум 20 символом поэтому пишу этот комментарий.