Составить и отладить программу для вычисления по указанной формуле. Значения переменных, указанных в правой части, ввести с клавиатуры, результат вывести на экран. Выполнить проверку правильности.
Answers & Comments
Mesher
Вроде должно быть так: program primer; var a,b,x:integer; y:real; begin write('Введите значение переменной A'); readln(a); write('Введите значение переменной B'); readln(b); y:=2.4*abs((sqr(x)+b)/a)+(a-b)*sqr(sin(a-b)+sqrt(10)(x-b); wtite('Результат',y:6:2); readln end.
Answers & Comments
program primer;
var a,b,x:integer;
y:real;
begin
write('Введите значение переменной A');
readln(a);
write('Введите значение переменной B');
readln(b);
y:=2.4*abs((sqr(x)+b)/a)+(a-b)*sqr(sin(a-b)+sqrt(10)(x-b);
wtite('Результат',y:6:2);
readln
end.