составить программу, вычисляющую значение Y, если: Y = x в третьей -2x, если x больше или ровно1
10-11 класс
|
2x-5, если x<1
var
x, y: real;
begin
Write('Введите х: ');
Readln(x);
if x < 1 then y := 2 * x - 5
else y := x * x * x - 2 * x;
Writeln('y=', y)
end.
Другие вопросы из категории
Вычеслить произведение не четных чисел от 11 до 99 шагом в 2
архиваторы
текстовые редакторы
Написать
программу, которая печатает объем памяти занимаемый одной переменной для типов
int, short int, long int, float и double.
Читайте также
2. написать программу, вычисляющую значение функции (y=f(x))
y=x-2, если x>0,
y=0, если x=0,
y=x*x, если x<0
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
результата введите ограничение на количество знаков после запятой. Примечание. В Паскале используются стандартные функции: SIN(X) - синус Х (аргумент задается в радианах); COS(X) - косинус Х (аргумент задается в радианах); Для подсчета угла в радианах используйте формулу: угол в радианах = (угол в градусах)*/180. Результат представьте в виде: Программа вычисления значений тригонометрических функций x° Sin(x) Cos(x) Tg(x) 1 2 3 .. 45
y=(a+d+c⁵)/√(x³-4)