Ответы
Ответ дал:
1
- uses Math;
- var
- result: real;
- a, b: real;
- begin
- Write('Введите a: ');
- Readln(a);
- Write('Введите b: ');
- Readln(b);
- if (a = b) then
- Writeln('Ошибка: a = b. Знаменатель равен нулю!')
- else
- result := (Power(a, 3.0) + Power( Power(b, 7.0), 1.0 / 4.0 )) / (Power( (a - b), 2.0 ));
- Writeln('Выражение равно ', result);
- end.
Похожие вопросы
1 год назад
2 года назад
8 лет назад