Вывести таблицу значений функции y = -0.23x2 + x. Значения аргумента (x) задаются минимумом, максимумом и шагом. Например, если минимум задан как 1, максимум равен 3, а шаг 0.5. То надо вывести на экран изменение x от 1 до 3 с шагом 0.5 (1, 1.5, 2, 2.5, 3) и значения функции (y) при каждом значении x.
Получить с клавиатуры значения x1 (минимум x), x2 (максимум x) и up (шаг).
Пока x1 не превысит x2 выполнять следующие действия:
вычислить значение y,
вывести на экран текущие значения x1 и y,
увеличить значение x1 на значение шага (up).
Pascal
var
x1,x2,up,y: real;
begin
readln(x1,x2,up);
while x1 <= x2 do begin
y := -0.23*x1*x1 + x1;
writeln(x1:5:2,' -> ',y:5:2);
x1 := x1 + up;
end;
end.