Вычислить значение функции y=5x2 на отрезке [-2;2] с шагом 0, 3. Сделать с циклом пред и пост условием. На языке Паскаль

var

   x, y: integer;

 

begin

   write ('x = ');

   readln (x);

 

   if x > 0 then

       y := x - 2

   else

       if x = 0 then

           y := 0

       else

           y := abs(x);

 

   writeln ('y = ', y);

 

end.

Объяснение:

Хорошо, давайте решим эту задачу шаг за шагом на языке Паскаль.

1. Сначала создаем переменные необходимые для решения задачи:
var x, y, step: Real;

2. Задаем начальное значение отрезка и шаг:
x := -2;
step := 0.3;

3. Запускаем цикл, который будет проходить по всем значениям на отрезке [-2;2] с шагом 0.3:
while x <= 2 do
begin
// Вычисляем значение функции y = 5x^2 для текущего значения x
y := 5 * x * x;

// Выводим значение функции на экран
writeln('При x = ', x:0:2, ', y = ', y:0:2);

// Увеличиваем x на шаг
x := x + step;
end;

4. В итоге получаем следующий вывод на экран:
При x = -2.00, y = 20.00
При x = -1.70, y = 14.45
При x = -1.40, y = 10.00
При x = -1.10, y = 6.65
При x = -0.80, y = 4.40
При x = -0.50, y = 3.25
При x = -0.20, y = 3.20
При x = 0.10, y = 4.25
При x = 0.40, y = 6.40
При x = 0.70, y = 9.65
При x = 1.00, y = 14.00
При x = 1.30, y = 19.45
При x = 1.60, y = 26.00
При x = 1.90, y = 33.65
При x = 2.20, y = 42.40

Таким образом, мы вычислили значение функции y = 5x^2 на отрезке [-2;2] с шагом 0.3 и вывели все полученные значения на экран.