Напишите программный код на языке Паскаль для вычисления модуля разности максимального и минимального значений у, если при шаге π/4.

Текст программы

var x, y, min, max, r: real;begin min:= MaxReal; max:= MinReal; x:= -2 * Pi; while x = 2 * Pi do begin y:= Tan(Power(x, 3)) * Sin(x); if y max then ...