1)program d; 2)var cos,x,y: real; 3)begin 4)writeln('введите значение х '); 5)readln(x); 6)if x< =2 then y: =(3*(exp(sin(*(sin(2*x))/(cos(2*x)) else 7) это выражение сайт не хочет читать , 8)if(x> =6) then y: =((sqrt(abs((cos*cos)*x)+6)+(; 9)writeln('при x=',x: 6: 3,'y=',y: 6: 2); 10)end. ожидалось имя процедуры или функции, ошибка в шестой строке, из-за того что я ввел косинус, а без косинуса в 8 строке ошибка : нет перегруженной подпрограммы с такими типами параметров. как быть?