Дополнен 6 лет назад
Дополнен 6 лет назад
var
a,b,x,y,z:boolean;
begin
writeln ('введите значения: x,y,z');
readln (x,y,z);
a:=(1+(sqr(cos)))*(x+y)/(2+(abs(x-(2*x))))/(1+sqr(x))*(sqr(z)+x);
writeln ('результат значения a:',a:6:2);
end.
Исправил скобки, а то кинул не доработанный вариант.
Program1.pas(6) : Нет перегруженной подпрограммы с такими типами параметров.
ПРОГРАММА:
var
a,b,x,y,z:integer;
begin
writeln ('введите значения: x,y,z');
readln (x,y,z);
a:=((1+(sqr(cos))*(x+y)/(2+(abs(x-(2*x)))/(1+sqr(x))*(sqr(z)+x)); //вот тут начинает выбивать эту ошибку, хрен знает что не так, помогите пожалуйста сделать его нормально.
writeln ('результат значения a:',a:6:2);
end.
Прикрепил формулу, которую переносил в паскаль.