Вычисления по известным формулам (PascalABC.NET): различия между версиями

Материал из Информационная безопасностя
Перейти к навигации Перейти к поиску
(Новая страница: «== Вычисление значений функций == Вычислить значение функции y = 4.5x2 – 5x + 6 при любом значен...»)
 
Строка 1: Строка 1:
 +
{{TOCRight}}
 
== Вычисление значений функций ==
 
== Вычисление значений функций ==
 
  Вычислить значение функции y = 4.5x2 – 5x + 6 при любом значении х, заданном вводом с клавиатуры.
 
  Вычислить значение функции y = 4.5x2 – 5x + 6 при любом значении х, заданном вводом с клавиатуры.

Версия 14:54, 2 мая 2023

Вычисление значений функций

Вычислить значение функции y = 4.5x2 – 5x + 6 при любом значении х, заданном вводом с клавиатуры.

Поскольку сказано, что х может принимать любые значения, а в функции есть коэффициент вещественного типа, логично объявить тип х также вещественным. Возведение в квадрат заменим умножением х на х для получения более короткой записи.

1 ##
2 var x := ReadReal('x =');
3 var y := 4.5 * x * x - 5 * x + 6;
4 Print('y =', y);
x = -3.178
y = 67.338578
Составить программу вычисления значений функций при любых значениях х и у.

Func1.png

Важно лишь правильно расставить скобки. Типы переменных – real.

1 ##
2 var (x, y) := ReadReal2('Введите значения x и y:');
3 var z := (x + 2 * y / x ** 2) / (y + 1 / Sqrt(x * x + 10));
4 var q := 2.8 * Sin(x) + Abs(y);
5 Write('z = ', z, ', q = ', q);
Введите значения x и y: 2.63 -5
z = -0.248959039622826, q = 6.37078649911448

Вычисление по формулам из геометрии

Найти площадь кольца по заданным внешнему и внутреннему радиусам.

RingSurf.png

Площадь кольца вычисляется по известной формуле S = pi * (R2 - r2), где R – внешний радиус, r – внутренний радиус.

1 ##
2 var (R1, r2) := ReadReal2('Введите внешний и внутренний радиусы:');
3 Print('S =', Pi * (Sqr(R1) - Sqr(r2)))
Введите внешний и внутренний радиусы: 120 105.3
S = 10404.6721253506