Составить программу, вычисляющую значение Y, если: Y = x в третьей - 2x, если x больше или ровно1

2x-5, если x<1

Question

Антонюшка

25 мая, 05:15

+2

Ответы (1)

Знаете ответ на вопрос?

Евдокея · Answer 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.

Составить программу, вычисляющую значение Y, если: Y = x в третьей - 2x, если x больше или ровно12x-5, если x<1