Написать программу и вычислить: Значение z задать с клавиатуры - Pascal ABC

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

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

Написать программу и вычислить: Значение z задать с клавиатуры

Решение задачи: «Написать программу и вычислить: Значение z задать с клавиатуры»

textual
Листинг программы
var
  a, y, d, z, x: real;
 
begin
  a := 12.56;
  readln(z);
  d := cos(a + 3) / 39;
  if z > 16 then
    y := power(z, 0.3) + 0.5 * d
  else
    y := d / 2 + power((z + a), 3);
  writeln(y);
end.

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

  1. Объявлены переменные: a, y, d, z, x (тип real).
  2. Значение переменной a установлено равным 12.56.
  3. С клавиатуры введено значение переменной z.
  4. Вычислено значение переменной d по формуле: d := cos(a + 3) / 39.
  5. Проведено сравнение z > 16, и если это условие истинно, то выполнено вычисление значения переменной y по формуле: y := power(z, 0.3) + 0.5 * d.
  6. Иначе, значение переменной y вычисляется по формуле: y := d / 2 + power((z + a), 3).
  7. На экран выведено значение переменной y.

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

9   голосов , оценка 3.667 из 5
Похожие ответы