Помогите решить задачу
Приложения:

Аноним:
Бог мой, что такое "пульт оператора"? В 60-х годах прошлого века составляли условию задачи?
Ответы
Ответ дал:
0
uses crt;
var a:real;
var b:real;
var c:real;
var d:real;
var h:real;
begin
{ вводим значения }
writeln('Enter a:'); readln(a);
writeln('Enter c:'); readln(c);
writeln('Enter d:'); readln(d);
writeln('Enter h:'); readln(h);
{ вычисляем }
b := d - sqrt(c / (c + abs(cos(a * h * h) - sin(a * h))));
{ выводим результат }
writeln('b = ', b:15:15);
{ задержка }
readln(a);
end.
var a:real;
var b:real;
var c:real;
var d:real;
var h:real;
begin
{ вводим значения }
writeln('Enter a:'); readln(a);
writeln('Enter c:'); readln(c);
writeln('Enter d:'); readln(d);
writeln('Enter h:'); readln(h);
{ вычисляем }
b := d - sqrt(c / (c + abs(cos(a * h * h) - sin(a * h))));
{ выводим результат }
writeln('b = ', b:15:15);
{ задержка }
readln(a);
end.
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад