program labka;
var
a, b, c: integer;
var
z: real;
begin
writeln('vvedite a b c');
ReadLn(a, b, c);
z := (sqr(a) + sqr(b) + sin(a)) * cos(b) + c / (sin(a) + b * cos(b)) - exp(abs(a - b));
Writeln('z= ', z: 5: 2);
readln;
end.
Добавлено:
z: real;
*Значение формулы должно хранится в какой-нибудь переменной, а не просто так! *
Исправлено:
1)
var a, b, c: integer;
//было var a, b, c: real//
*В задании написано, что a, b и с являются целочисленными переменными( от фразы "целое число")*
2)
Обновлена формула:
-Добавлены и убраны скобки;
-В конце исправлено "корень из (а-b)" на "е в степени модуля (a-b)";
3)
Исправлен вывод.
*Нужно вывести значение вычисленной формулы!!! *