Предмет: Информатика,
автор: RikonMw
подскажите пожалуйста решение примера , его надо решить в PASCAL ABC
а я понятия не имею как это делать
Приложения:

Ответы
Автор ответа:
1
begin
Writeln('Введите x, y, z:');
var(x, y, z) := ReadInteger3();
var a := (3 + Exp(y - 1)) / (1 + x * x * Abs(y - Tan(z)));
var b := (y - x) ** 2 / 2 + Abs(y - x) ** 3 / 3;
var c := a * a * Sqrt(Abs(a - b));
WriteFormat('a = {0}, b = {1}, c = {2}', a, b, c)
end.
iolandavalerypad353:
третья строка скорее всего var (x, y, z) := ReadReal3(); замените
Похожие вопросы
Предмет: Химия,
автор: soflefxx
Предмет: Алгебра,
автор: sashulkaverbitskaya
Предмет: Химия,
автор: Loxito
Предмет: Алгебра,
автор: Аноним
Предмет: Математика,
автор: Кааропс