Вычислить значения выражений - Turbo Pascal (29007)

Узнай цену своей работы

Формулировка задачи:

Даны x, y и z. Вычислите a, b, если: Таблицу и блок-схему, будьте добры.

Решение задачи: «Вычислить значения выражений»

textual
Листинг программы
  1. var x, y, z: real;
  2. begin
  3.   write('x = ');
  4.   readln(x);
  5.   write('y = ');
  6.   readln(y);
  7.   write('z = ');
  8.   readln(z);
  9.   writeln('a = ', (cos(x * x + pi / 3) + 3 * y * y - sin(z)) / sqrt(abs(sin(x) + abs(y) + 3)));
  10.   writeln('b = ', 4 - exp(x + y + z) / (x * x + 1));
  11.   readln
  12. end.

Объяснение кода листинга программы

  1. Объявляются переменные x, y, z типа real.
  2. Выводится сообщение «x = », после чего считывается значение переменной x.
  3. Выводится сообщение «y = », после чего считывается значение переменной y.
  4. Выводится сообщение «z = », после чего считывается значение переменной z.
  5. Вычисляется значение выражения (cos(x x + pi / 3) + 3 y * y - sin(z)) / sqrt(abs(sin(x) + abs(y) + 3)). Результат присваивается переменной a.
  6. Вычисляется значение выражения 4 - exp(x + y + z) / (x * x + 1). Результат присваивается переменной b.
  7. Программа завершается, ожидая ввода пользователя.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 3.615 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут