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